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System 
Programming 
Concepts 


Purpose of this Manual 


This guide provides you with in-depth informa- 
tion on the AT&T Personal Computer program 
development tools. The guide focuses on what 
you need to know to make use of the existing 
AT&T Personal Computer 6300 hardware and 
hardware interfaces. 


The final chapter on programming devices 
assumes that you have a working knowledge of 
the principles of designing device drivers and 
need the technical details on how to program the 
AT&T Personal Computer. 
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System 
Programming 
Concepts 


Notation 


The following syntax is used throughout this 
manual in descriptions of command and state- 
ment syntax: 


[] Square brackets indicate that the enclosed 
entry is optional. 


{i Braces indicate a choice between two or 
more entries. At least one of the entries 
enclosed in braces must be chosen. 


Ellipses indicate that an entry may be 
repeated as many times as needed. 


This guide contains examples of prompts and 
messages displayed on the screen. These system- 
displayed items are indented from the main 
body of the text so that you can easily distin- 
guish them. For example, MS-LINK prompts: 


OBJECT MODULES[.OBJ] 


Descriptions or examples that show a required 
response are indented and presented in boldface 


type: 
LINK OBJ 1+OBJ2+OBJ3,MAP 


System 
Programming 
Concepts 


Programming Steps 


Running 
High-Level 
Language 


Writing 
Assembler 
Programs 


Writing 
Utilities 


Programming 
Devices 
Directly 
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This section shows where to go for information 
on the task you are performing. 


If you are running a program via the BASIC 
interpreter, the section on “System Calls” is 
applicable, since you can call these functions via 
a BASIC program. 


If you are running a compiled program, read the 
section on MS-LINK as well as the section on 
System Calls. 


The first eight chapters are aimed at pro- 
grammers writing assembler programs. If you 
have not used the 8088 or 8086 assembly lan- 
guage, the section “8086 Addressing Scheme’”’ 
gives you a good start. The sections on the linker 
and debugger are fundamental to writing and 
debugging assembler programs. Also read the 
sections on “System Calls” and “ROM BIOS 
Service Calls.” 


If you are writing a supplementary utility pro- 
gram, read the sections on assembly programs, 
the sections on “Memory Maps, Control Blocks, 
and Diskette Allocation,” and “Program File 
Structure and Loading.” 


Every section applies to writing device drivers, 
especially the chapter on “MS-DOS Device 
Drivers.” 
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Overview 

MS-LINK File Usage 
Segments, Groups, and Classes 
Invoking MS-LINK 

Sample MS-LINK Session 
MS-LINK Error Messages 
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Overview 


MS-LINK is an executable program on your 
DOS Supplemental Programs diskette. MS- 
LINK combines object modules that are the 
output of the MACRO-86 assembler or a 
compatible compiler. It produces a relocatable 
run file (load module) and a list file of external 
references and error messages. 


To run MS-LINK, you provide object, run, list, 
and library file parameters. You may optionally 
enter switches that modify the operation of 
MS-LINK. 


“Invoking the Linker” describes the three ways 
to run MS-LINK: interactive entry, command 
line entry, and automatic response file entry. 
Interactive entry is used most frequently, so its 
section contains information common to all 
three methods. 


If you are linking a high-level language 
program, the compiler determines the 
arrangement of your object modules in memory. 
If you are using assembler, however, you have 
more control over your program’s organization. 
The section “Segments, Groups, and Classes’”’ 
shows you how to specify the order of your 
object modules at run time. 
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MS-LINK File Usage 


The link process involves the use of several files. 


MS-LINK: 

Works with one or more input files 
Produces two output files 

Creates a temporary disk file if necessary 


Searches up to eight library files 
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MS-LINK 


The format for MS-LINK file specifications is 
the same as that of any disk file: 


Syntax [d:][ path |filename[.ext] 


d: the drive designation. Permissible drive designa- 
tions for MS-LINK are A: through O:. 


path a path of directory names. 

filename any legal filename of one to eight characters. 

ext a one- to three-character extension to the 
filename. 


If no filename extensions are given in the input 
(object) file specifications, MS-LINK recognizes 
the following extensions by default: 


OBJ Object 
LLIB Library 


MS-LINK appends the following default exten- 
sions to the output (Run and List) files: 


EXE Run (may not be overridden) 
MAP List (may be overridden) 
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a 


VM.TMP File MS-LINK uses available memory for the link 
session. If an output file exceeds available 
memory, MS-LINK creates a temporary file, 
names it VM.TMP, and puts it on the disk in the 
default drive. If MS-LINK creates VM.TMP, it 
will display the message: 


VM.TMP has been created. 
Do not change diskette in drive, <d:> 


Once this message is displayed, do not remove 
the diskette from the default drive until the link 
session ends. If the diskette is removed, the 
operation of MS-LINK is unpredictable and MS- 
LINK usually displays the error message: 


Unexpected end of file on VM.TMP 


MS-LINK writes the contents of VM.TMP to the 
file named following the Run File: prompt. 
VM.TMP is a working file only and is deleted at 
the end of the linking session. 


Do not use VM.TMP as a filename for any file. 
If MS-LINK requires the VM.TMP file, MS- 
LINK deletes the VM.TMP already on disk and 
creates a new VM.TMP. Thus, the contents of 
the previous VM.TMP file are lost. 
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Changing 
diskettes 


You may want to change diskettes during the 
link operation. If MS-LINK cannot find an 
object file on the specified diskette, it prompts 
you to change diskettes rather than aborting the 
session. If you enter the /PAUSE switch, MS- 
LINK pauses and prompts you to change 
diskettes before it creates the run file. You may 
change diskettes when prompted except in the 
following cases: 


the diskette you want to change has a VM.TMP 
file on it. 


you have requested a list file on the diskette you 
want to change. 
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Segments, Groups, and Classes 


Segment 


Class 


Below terms are explained to help you under- 
stand how MS-LINK works. Generally, if you 
are linking object modules from a high-level 
language compiler, you do not need to know 
these terms. If you are linking assembly lan- 
guage modules, read this section carefully. 


The segment is one of the most basic units of 
program memory organization. A segmentisa 
contiguous area of memory up to 64K bytes long, 
and may be located anywhere in RAM. The con- 
tents of a segment are addressed by a seg- 
ment:offset address pair, where “segment” is the 
segment’s base or lowest address (see “The 20- 
Bit Address” in chapter 4). 


Each segment has a class name in addition to 
its segment name. All segments with the same 
class name are loaded into memory contiguously 
by the linker from the first segment of that class 
to the last. 


A class is a collection of related segments. By 
naming the segments of your assembly lan- 
guage program to classes, you control the order 
in which they are loaded into memory (for high 
level languages, the compiler does this for you). 


MS-LINK loads segments into memory on a 
class-by-class basis. Starting with the first class 
encountered in the first object file, all of the 
segments of each class are loaded. Within each 
class, the linker loads the segments in the order 
in which it finds them in the object files. There- 
fore, you can control the order in which classes 
are loaded by the order in which segments from 
different classes appear in the object files. 


2-7 


MS-LINK 


Group 
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To ensure that classes are loaded in the order 
you desire, you can create a dummy module to 
feed to the linker as the first object file. This 
module declares empty-segment classes in the 
order you want the classes loaded. For example, 
one such file might look like this: 


SEGMENT ‘CODE’ 

ENDS 

SEGMENT ‘CONST’ 

ENDS 

SEGMENT ‘DATA’ 

ENDS 

SEGMENT STACK ‘STACK’ 
ENDS 


ODUQAQOWWp LS 


If this method is used, be sure to declare all the 
classes used in your program in the dummy 
module; otherwise, you lose absolute control over 
the ordering of classes. Also, this method should 
only be used when linking assembly language 


programs. Do not create a dummy module if link- 


ing object files for a compiler, or unpredictable 
results may occur. Classes may be any length. 


Just as classes allow you to combine segments 
in a way that is logical, groups combine seg- 
ments in 64K byte chunks to make them easily 
addressable. The segments in a group need not 
be contiguous, but when loaded they must fit 
within 64K bytes. This way each segment in the 
group can be fully addressed by an offset to one 
segment address, which is the start address of 
the lowest segment in the group. Segments are 
named to groups by the assembler or compiler 
or, as is possible in assembly language pyro- 
grams, by the programmer. Note that a segment 
can be large enough to be an entire group by 
itself. 
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Invoking MS-LINK 


Ways 
to Invoke 
MS-LINK 


Interactive 
Entry 


MS-LINK is invoked in one of three ways. The 
first method, interactive entry, requires you to 
respond to individual prompts. 


For the second method, command line entry, 
type all commands on the same line used to start 
MS-LINK. 


To use the third method, automatic response file 
entry, create a response file that contains all the 
necessary commands and tell MS-LINK where 
that file is when you run MS-LINK. 


Interactive Entry LINK 
Command Line Entry LINK filenames[/switches] 


Automatic Response 
File Entry LINK @filespec 


To invoke MS-LINK interactively, type: 
LINK 


MS-LINK loads into memory, then displays four 
prompts, one at a time. At the end of each line, 
after typing your response to the prompt, you 
may type one or more switches preceded by a 
forward slash. 


The command prompts are summarized below. 
Defaults appear in square brackets ((]) after the 
prompt. Object Modules is the only prompt that 
requires a response. 
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MS-LINK 
Prompts 


Prompt Responses 


Object Modules[.OBJ]: [d:][path]filename[.ext] 
[+[[d:][path]filename[.ext]]...] 


Run File[filename.EXT]: [d:][path][filename[.ext]] 
List File[NUL.MAP]: [d:][path][filenamef[.ext]] 


Libraries[. LIB]: [d:][path][filename[.ext]] 
[+[d:][[path ]filenamef[.ext]]...] 


Notes: 


If you enter a filename without specifying the 
drive, the default drive is assumed. If you enter a 
filename without specifying the path, the default 
path is assumed.The libraries prompt is an 
exception — if the linker looks for the libraries 
on the default drive and doesn’t find them, it 
looks on the drive specified by the compiler. 


To select default responses to all remaining 
prompts, use a single semicolon (;) followed 
immediately by <return> at any time after the 
second prompt (Run File:). 


Once you enter the semicolon, you can no longer 
respond to any of the prompts for that link ses- 
sion. Use the CRETURN> key to skip prompts. 


Use <CONTROL-C> to abort the link session at 
any time. 


MS-LINK 


Object 
Modules 
to be 
Included 


Listing 


Object Modules [.OBJ]: 


List .OBJ files to be linked. They must be separ- 
ated by blank spaces or plus signs (+). If the plus 
sign is the last character typed, this prompt will 
reappear so that you can enter more object 
modules. 


MS-LINK assumes that object modules have the 
extension .OBJ unless you explicitly specify 
some other extension. Object filenames may not 
begin with the @ symbol (@ is used for specify- 
ing an automatic response file). 


The order in which you key in the the object files 
is significant. See section on segments, groups, 
and classes for more information. 


Run File [Obj-file EXE]: 


Give filename for executable object code. The 
default is: <first-object-filename>.E XE. (You 
cannot change the output extension.) You can 
specify just the drive designation or just a path 
for this prompt. 


List File [NUL.MAP]: 


Give filename for listing (also known as a linker 
map). The listing is not created if you select the 
default. You can request a listing by entering a 
drive designator, path, or filename|.ext]. If you 
do not specify an extension, the default .MAP is 
used. 


MS-LINK 


Libraries 
to be 
Searched 


You can have the listing printed by specifying a 
print device instead of a filename or have the 
listing displayed on the screen by specifying 
CON. If you display the linker map, you can 
also print it by pressing Ctrl-PrtSc. 


Libraries [.LIB]: 


List filenames to be searched separated by blank 
spaces or plus signs (+). If a plus sign is the last 
character typed, the prompt will reappear. 


MS-LINK searches library files in the order 
listed to resolve external references. When it 
finds the module that defines the external sym- 
bol, MS-LINK processes that module as another 
object module. 


There is no default library search for MACRO 
assembler object modules. For compiled 
modules, if you select the default for this prompt, 
MS-LINK looks for the compiler package’s 
library on the default drive. If not found there, 
MS-LINK looks on the drive specified by the 
compiler. 


If MS-LINK cannot find a library file, it 
displays: 


Cannot find library <library-name> 
Type new drive letter: 


Press the letter for the drive designation (for 
example, B). 


If two libraries have the same filename, only the 
first in the list is searched. 
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MS-LINK 


The seven MS-LINK switches control various 
MS-LINK functions. Type switches at the end of 
a prompt response regardless of which method 
you use to start MS-LINK. Switches may be 
grouped at the end of any response, or may be 
scattered at the end of several. Even if you type 
more than one switch at the end of one response, 
each switch must be preceded by a forward slash 


(/). 


All switches may be abbreviated. The only re- 
striction is that an abbreviation must be sequen- 
tial from the first letter through the last typed; 
no gaps or transpositions are allowed. For 
example: 


Legal Illegal 
/D /DSL 
/DS /DAL 
/DSA /DLC 


/DSALLOCA /DSALLOCT 


MS-LINK 


/DSALLOCATE 


/HIGH 
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/DSALLOCATE tells MS-LINK to load all data 
at the high end of the Data Segment. Otherwise, 
MS-LINK loads all data at the low end of the 
Data Segment. At runtime, the DS pointer is set 
to the lowest possible address to allow the entire 
DS segment to be used. Use of /DSALLOCATE 
in combination with the default load low (that 
is, the /HIGH switch is not used) permits the 
user application to dynamically allocate any 
available memory below the area specifically 
allocated within DGroup yet to remain address- 
able by the same DS pointer. This dynamic allo- 
cation is needed for Pascal and FORTRAN 
programs. 


Your application program may dynamically 
allocate up to 64K bytes (or the actual amount of 
memory available) less the amount allocated 
within DGroup. 


/HIGH causes MS-LINK to place the Run file as 
high as possible in memory. Otherwise, MS- 
LINK places the Run file as low as possible. 


Note: 
Do not use /HIGH with Pascal or FORTRAN 
programs. 
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} /LINENUMBERS 
/LINENUMBERS tells MS-LINK to include in 
the List file the line numbers and addresses of 
the source statements in the input modules. 


Otherwise, line numbers are not included in the 
List file. 


Not all compilers produce object modules that 
contain line number information. In these cases, 
of course, MS-LINK cannot include line 
numbers. 


/MAP /MAP directs MS-LINK to list all public (global) 
symbols defined in the input modules. If /MAP 
is not given, MS-LINK will list only errors 


™—, (including undefined globals). 


The symbols are listed alphabetically. For 
each symbol, MS-LINK lists its value and its 
segment:offset location in the Run file. The 
symbols are listed at the end of the List file. 


/PAUSE /PAUSE causes MS-LINK to pause in the link 
session when the switch is encountered. Nor- 
mally, MS-LINK performs the linking session 
from beginning to end without stopping. This 
switch enables you to swap the diskettes before 
MS-LINK outputs the Run (.EXE) file. 
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/STACK: 
<number> 
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When MS-LINK encounters /PAUSE, it dis- a 
plays the message: 


About to generate .EXE file 
Change disks <hit any key> 


MS-LINK resumes processing when you press 
any key. 


Note 

Do not remove the disk which will receive the 
List file, or the disk used for the VM.TMF file, if 
one has been created. 


Stack number represents any positive numeric 

value (in hexadecimal radix) up to 65536 bytes. 

If a value from 1 to 511 is typed, MS-LINK will New 
use 512. If /STACK is not used for a link ses- 

sion, MS-LINK calculates the necessary stack 

size automatically. 


All compilers and assemblers should provide 
information in the object modules that allow the 
linker to compute the required stack size. 


At least one object (input) module must contain 
a stack allocation statement. If not, MS-LINK 
will display the following error message: 


WARNING: NO STACK STATEMENT 


MS-LINK 


/NO 


/NO is short for NODEFAULTLIBRARY- 
SEARCH. This switch applies only to higher 
level language modules. This switch tells MS- 
LINK not to search the default libraries in the 
object modules. For example, if you are linking 
object modules in Pascal, specifying /NO tells 
MS-LINK not to automatically search the 
library named PASCAL.LIB to resolve external 
references. 
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Purpose 


Syntax 


obj-list 


runfile 


listfile 


lib-list 


/switch 
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Command Line Entry 


You may invoke MS-LINK by typing all com- 
mands on one line. The entries following LINK 
are responses to the command prompts. The 
entry fields for the different prompts must be 
separated by commas. Use the following syntax: 


LINK <obj-list>,<runfile>,<listfile>, 
<lib-list>[/switch...] 


a list of object modules, separated by plus signs 
or spaces. 


name of the file to receive the executable output. 


name of the file to receive the listing. 


list of library modules to be searched, separated 
by spaces or plus signs. 


refers to optional switches which may be placed 
following any of the response entries (just before 
any of the commas or after the <lib-list>, as 
shown). 


To select the default for a field, simply type a 
second comma with no spaces between the two 
commas. 


MS-LINK 
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Automatic 
Response 
File 

Entry 


Example: 


LINK FUN+TEXT+TABLE+CARE, 
FUNLIST, COBLIB.LIB 


This command causes MS-LINK to load. Then 
the object modules FUN.OBJ, TEXT.OBJ, 
TABLE.OBJ and CARE.OBJ are loaded. MS- 
LINK links the object modules and writes the 
output to FUN.EXE (by default), creates a List 
file named FUNLIST.MAP, and searches the 
library file COBLIB.LIB. 


It is often convenient to save responses to the 
linker for re-use at a later time. This is especially 
useful when a long list of object modules needs 
to be specified. The use of an automatic response 
file allows you to do this. 


Before using this option, you must create the 
response file. Each line of text corresponds to 
one MS-LINK prompt. The responses must be 
typed in the same order as they are when 
entered interactively. To continue a line, type a 
plus sign (+) at the end of the line. 


You can enter the name of more than one auto- 
matic response file on the command line and 
combine response file names with additional 
parameters. The combined series of resulting 
parameters must be a valid sequence of MS- 
LINK prompts. 


Use switches and special characters (+ and ;) in 
the response file the same way they are used 
when entered interactively. 
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To invoke the linker using a response file, type 
LINK @ <filespec> 


Filespec is the name of a response file. 


When the session begins, MS-LINK displays 
each prompt with the corresponding response 
from the response file. If the response file does 
not contain answers for all the prompts, MS- 
LINK displays the prompt which does not have 
a response and waits for a response. When you 
type a legal response, MS-LINK continues the 
link session. 


Example: 


FUN TEXT TABLE CARE 
/PAUSE /MAP 
FUNLIST 

COBLIB.LIB 


This response file tells MS-LINK to load the four 
object modules named FUN.OBJ, TEXT.OBJ, 
TABLE.OBJ, and CARE.OBJ. MS-LINK pauses 
before producing a public symbol map to permit 
you to swap disks. When you press any key, the 
output files will be named FUN.EXE and 
FUNLIST.MAP. MS-LINK will search the 
library file COBLIB.LIB. 
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Sample MS-LINK Session 


This sample shows you the type of information 
displayed during an MS-LINK session. 


In response to the MS-DOS prompt, type: 
LINK 


The system displays the following messages and 
prompts: 


Microsoft Object Linker V2.01 (Large) 
(C) Copyright 1982,1983 by Microsoft Inc. 


Object Modules [.OBJ]: IO SYSINIT 
Run File [IO.EXE]: 

List File [NUL.MAP]: PRN /MAP /LINE 
Libraries [.LIB]: ; 


Notes: 


By specifying /MAP, you get both an alphabetic 
listing and a chronological listing of public 
symbols. 


By responding PRN to the List File: prompt, you 
can redirect your output to the printer. 


By specifying the /LINE switch, MS-LINK 
gives you a listing of all line numbers for all 
modules. (Note that /LINE can generate a large 
volume of output.) 
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Once MS-LINK locates all libraries, the linker 
map displays a list of segments in the order of 
their appearance within the load module. The 

list might look like this: 


Start Stop Length Name 
OOOOOH OOSECH O9EDH CODE 
OO9FOH O1166H 0O777H SYSINITSEG 


The information in the Start and Stop columns 
shows the 20-bit hex address of each segment 
relative to location zero. Location zero is the 
beginning of the load module. 


The addresses displayed are not the absolute 
addresses where these segments are loaded. See 
the following section on the MS-LINK DEBUG 
program for information on how to determine 
the absolute address of a segment. 


A 
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Because the /MAP switch was used, MS-LINK 
displays the public symbols by name and value. 
For example: 


ADDRESS PUBLICS BY NAME 
OO9F:0012 BUFFERS 

OO9F:0005 CURRENT DOS LOCATION 
OO9F:0011 DEFAULT DRIVE 
OO9F:OO0B DEVICE LIST 

OO9F:0013 FILES 

OO9F:0009 FINAL DOS LOCATION 
OO9F:OOOF MEMORY SIZE 

OO9F:0000 SYSINIT 

ADDRESS PUBLICS BY VALUE 
OO9F:0000 SYSINIT 

OO9F:0005 CURRENT DOS LOCATION 
OO9F:0009 FINAL DOS LOCATION 
OO9F:O000B DEVICE LIST 

OO9F:OOOF MEMORY SIZE 

OO9F:0011 DEFAULT DRIVE 
OO9F:0012 BUFFERS 

OO9F:0013 FILES 


The final line in the listing file describes the 
program’s entry point: 


Program entry point at 0009F:0000 


Ms-LINK 


MS-LINK Error Messages 


All errors, except for the two warning messages, wWw 
cause the link session to abort. After the cause 

has been found and corrected, MS-LINK must be 

rerun. The following error messages are 

displayed by MS-LINK: 


Attempt to access data outside of segment bounds, 
possibly bad object module 


There is probably a bad object file. 


Bad numeric parameter 


Numeric value is not in digits. 


Cannot open temporary file 


MS-LINK is unable to create the file VM.TMP 
because the disk directory is full. Insert a new 


disk. Do not remove the disk that will receive the 
List. MAP file. 


Error: dup record too complex 


DUP record in assembly language module is too 
complex. Simplify DUP record in assembly lan- 
guage program. 


MS-LINK 
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Error: fixup offset exceeds field width 
An assembly language instruction references an 
address with a short or near instruction instead 
of a long or far instruction. Edit assembly 
language source and reassemble. 


Input file read error 


There is probably a bad object file. 


Invalid object module 
An object module(s) is incorrectly formed or 
incomplete (as when assembly is stopped in the 
middle). 

Symbol defined more than once 
MS-LINK found two or more modules that 
define a single symbol name. 

Program size or number of segments exceeds capacity of 

linker 
The total size may not exceed 384K bytes and 
the number of segments may not exceed 255. 


Requested stack size exceeds 64K 


Specify a size less than or equal to 64K bytes 
with the /STACK switch. 
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Segment size exceeds 64K VW 


64K bytes is the addressing system limit. 


Symbol table capacity exceeded 
Very many and/or very long names were typed 
exceeding the limit of approximately 50K bytes. 
Too many external symbols in one module 


The limit is 256 external symbols per module. 


Too many groups 


The limit is ten groups. 


Too many libraries specified 


The limit is 8 libraries. 


Too many public symbols 


The limit is 1024 public symbols. 


Too many segments or classes 


The limit is 256 (segments and classes together 
must total 256 or less). — 


MS-LINK 


ELS SDN Ge I cP A NS tat A CER SSN STS A Lo DESIR aT SE RE SPIES 7 BSE PE SUE OE RRR Gis EER ECV A ETE 
Unresolved externals: <list> 
The external symbols listed have no defining 
module among the modules or library files 
specified. 
VM read error 
This is a disk error; it is not caused by 
MS-LINK. 
Warning: no stack segment 
None of the object modules specified contains a 
statement allocating stack space. 
Warning: segment of absolute or unknown type 
There is a bad object module or an attempt has 
been made to link modules that MS-LINK 
cannot handle (e.g., an absolute object module). 
Write error in TMP file 
No more disk space remains to expand the 
VM.TMF file. 
Write error on run file 


Usually, this means there is not enough disk 
space for the Run file. 
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DEBUG 


Overview 


3-2 


The DEBUG utility is an executable object program 
that resides on your MS-DOS diskette. DEBUG per- 
forms the following functions: 


Allows you to single step through a program, instruc- 
tion by instruction, for testing purposes. 


Changes register and file contents during the 
DEBUG session so that you can test a code change 
without reassembling your program. 


Makes permanent changes to diskette files so you can 
use DEBUG to recover files that may otherwise be 
lost. 


Supports a disassemble command so you can 
translate machine code instructions into their assem- 
bly language equivalents for testing purposes. 


filespec 


arglist 


DEBUG 


How to Invoke DEBUG 


The DEBUG program is invoked as follows: 
DEBUG [filespec [,arglist]] 


the name of the program file to be debugged. 


An optional list of file name parameters and 
switches. These will be passed to the program 
specified by the filespec parameter. When the 
program is loaded into memory, it is loaded as if 
it had been invoked with the command 


filespec arglist 


That is, filespec indicates the file to be debugged, 
and arglist is the rest of the command line that 


is used when the file is invoked and loaded in 
memory via COMMAND.COM. 


If you enter DEBUG without parameters, since 
no file name has been specified, current memory, 
disk blocks, or disk files can be manipulated. 


DEBUG 


Comments 


Examples 
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On entering the DEBUG environment DEBUG 
responds with the hyphen (-) prompt and under- 
line (_) cursor. You now may enter any DEBUG 
command. 


If you include the filespec in the command line, 
the specified file is loaded into memory starting 
at location 100 (hexadecimal). However, if you 
specify a file with a .E XE extension, the pro- 
gram is relocated to the address specified in the 
header of the file. See the chapter on “Program 
Structure and Loading” for information on the 
format of the file header. 


If the file has the HEX extension, the file is 
loaded beginning at the address specified in the 
HEX file. HEX files are in INTEL hex format 
and are converted to memory image format by 
DEBUG. 


All DEBUG commands may be aborted at any 
time by pressing <CTRL-C>. Pressing 
<CTRL-S> suspends the display, so that you 
can read it before the output scrolls away. After 
suspending the display, press any key (except 
<CTRL-S> or <CTRL-C>) to continue scrolling. 


DEBUG <CR>. 


The DEBUG session begins, but without loading 
a file. 


DEBUG b:myprog <CR>. 


The DEBUG environment is entered and the file 
named “myprog”’ is loaded into memory from 
drive B. 


DEBUG 


When you invoke DEBUG, it sets up a program 
segment prefix at offset 0 in the program work 
area. You can overwrite this area if you enter 
DEBUG without parameters. Moreover, if you 
are debugging a file with a COM or EXE exten- 
sion, do not tamper with the program header 
below location 5CH, or DEBUG will terminate. 


Do not restart a program after a “Program ter- 
minated normally” message is displayed. You 
must reload the program with the N and L 
commands for it to run properly. 
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Debugging Commands 


Be a 


This section describes the DEBUG commands in 
alphabetical order for ease of reference. 


© Commands can be entered in either upper or 
lower case. 


® Command keywords and command parameters 
can be separated from each other by spaces or 
commas for readability but need not be, except 
where two hexadecimal numbers are entered as 
parameters, in which case they must be sepa- 
rated by a comma or space. For brevity, the syn- 
tax of this chapter will always indicate a comma 
where separation is obligatory, but note that a 
space can alternatively be used. 


® Commands only become effective after entering 
<CR>. 


® If you make a syntax error when entering a 
command, the message “Error” will be dis- 
played. You must re-enter the command using 
the correct syntax. 
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DEBUG 


Command Parameters 


The following DEBUG command parameters 
require definition. 


address a hex value in one of the following formats: 


® asegment register designation and a hex offset 
separated from each other by a colon. For 
example: 


DS:0300 


® a hexadecimal segment and offset separated 
from each other by a colon. For example: 


9D0:0100 


“n ® a hexadecimal offset value. The DEBUG 
command will use a default segment value from 
either the DS or CS registers, depending on the 
command. For example: 


200 


byte a one or two character hexadecimal value. 


drive 0, 1, or 2 depending on whether you wish to 
select drive A, drive B or drive C, respectively. 
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range 


value 
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a range of addresses. The range can be specified 
as 


address L value 


where address specifies the start of the range and 
value specifies the length of the range. For 
example: 


DS:300L30 


indicates a range of 48 locations starting at 
address 300 in the segment indicated by the DS 
register. 


The specified range cannot be greater than 10000 
(hexadecimal). To specify this value enter 0000 (or 
0) as the value parameter. 


A range can also be specified as: 
address,address 


where the two addresses indicate the limits of the 
range. A space may be used instead of a comma. 


a 1 to 4 character hexadecimal value. 


DEBUG 


A (ASSEMBLE) 


Syntax 


Comments 


Assembles 8086 mnemonics directly into 
memory. 


A [address] 


Address is the start address into which the sub- 
sequently entered line of mnemonics is to be 
assembled. If this parameter is omitted, offset 
100 from the segment in the CS register is 
assumed, if you did not enter an Assemble 
command previously. If you did enter Assemble 
previously, the code assembles into the address 
following the last instruction loaded by the pre- 
vious Assemble command. 


After you enter the Assemble command, 
DEBUG displays the specified address followed 
by the cursor. You may then enter a line of 8086 
assembler mnemonics. On terminating the line 
with <CR>, the line will be assembled into 
memory starting at the specified location. The 
address of the byte subsequent to the assembled 
code will be displayed on the next line along 
with the cursor to enable you to enter the next 
line of code. If, instead of a line of 8086 mnemon- 
ics, you simply enter <CR>, the Assemble com- 
mand terminates and the DEBUG prompt 
reappears. 


All numeric values are hexadecimal and must be 
entered as 1 to 4 characters without a trailing H. 
Prefix mnemonics must be specified in front of 
the opcode to which they refer. You may also 
enter them on a separate line. 


The segment override mnemonics are CS:, DS:, 
ES: and SS:. The mnemonic for the far return is 
RETF. String manipulation mnemonics must 
explicitly state the string size. For example, use 
MOVSB to move byte strings. 
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The Assemble command will automatically 
assemble short, near, or far jumps and calls, 
depending on byte displacement with respect to 
the destination address. These may be overrid- 
den with the NEAR or FAR prefix. For example: 


0100:0500 JMP 502 ‘a two-byte 
‘short jump 

0100:0502 JMP NEAR 505 ‘a three-byte 
‘near jump 

0100:505 JMP FAR 50A ‘a five-byte far 


jjump 


The NEAR prefix may be abbreviated to NE, 
but the FAR prefix cannot be abbreviated. 


DEBUG cannot tell whether some operands 
refer to a word memory location or to a byte 
memory location. In this case the data type must 
be explicitly stated with the prefix “WORD 
PTR” or “BYTE PTR”. Acceptable abbrevia- 
tions are “WO” and “BY”. For example: 


NEG BYTE PTR[128] 
DEC WO [SI] 


DEBUG cannot distinguish whether an operand 
refers to a memory location or to an immediate 
operand. Enclose operands that refer to memory 
locations in square brackets. For example: 


MOV AX,21 ‘Load AX with 21H 
MOV AX,[21] ‘Load AX with the contents of 
‘location 21H 


DEBUG 


® Two pseudo-instructions are available with the 
Assemble command. The DB opcode will assem- 
ble byte values directly into memory. The DW 
opcode assembles word values into memory. For 
example: 


DB 1,2,3,4,"THIS IS AN EXAMPLE” 
DB 'THIS IS A QUOTE:”’ 

DB ‘THIS IS A QUOTE’” 

DW 1000,2000,3000,"BACH” 


¢ The Assemble command supports all forms of 
register indirect addressing. For example: 


ADD BX,34[BP+2]. [SI-1] 
POP [BP+DI] 
PUSH [SI] 


All opcode synonyms are supported. For 
example: 


LOOPZ 100 
LOOPE 100 
JA 200 
JNBE 200 
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Example 1 Enter A200 <CR>. 
2 DEBUG displays O9AC:0200_. 
3 Enter MOV AX[21]<CR>. 
4 The 8086 mnemonics are assembled starting at 


location 200. The byte location subsequent to the 
assembled code is then displayed: 


O9AC:0203_ 
5 Enter <CR>. 


6 The Assemble command terminates and the 
DEBUG prompt reappears. 
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C (COMPARE) 


Syntax 


range 


address 


Comments e 


Compares the contents of two areas of memory. 


C range,address 


the range of addresses defining the first area to 
be compared. If no segment is specified, then the 
segment specified in the DS register is assumed. 


the start of the area to be compared with the 
area specified by the range parameter. 


The Compare command compares the area of 
memory specified by the range parameter with 
an area of the same size starting at the location 
specified by the address parameter. 


If the contents of the two areas are identical, 
nothing is displayed. If there are differences, 
then the differences are displayed in the form 


<address1l><contents1><contents2> <address2> 


<address1> indicates the address in the first 
area and <contents1> its contents. <address2> 
indicates the corresponding address in the 
second area and <contents2> its contents. 


3-13 


DEBUG 


Example 


1 Enter C100,1FF,300 <CR> or 
C100L100, 300 <CR>. 


2 Thearea of memory from 100 to 1FF is com- 
pared with the area of memory from 300 to 3FF. 


DEBUG 


D (DISPLAY) 


Displays an area of memory. 


Syntax D [range] or 
D [address] 


range the range of addresses whose contents are to be 
displayed. If you enter only offsets, then the 
segment specified in the DS register is assumed. 


address the address from which the display is to start. 
The contents of this address and the subsequent 
127 locations are displayed. If only an offset is 
Mm entered, then the segment specified in the DS 
) register is assumed. 


Comments ® If D is specified without parameters, then the 
128 bytes following the last address to be dis- 
played are displayed. If no location has yet been 
accessed, the display will start from location 
DS:100. 


e If D and the range parameter are specified, the 
contents of that range of addresses are dis- 
played. If this takes more than 24 screen lines, 
the display is scrolled until the contents of the 
final address in the range are displayed on line 
24. 


® The display is displayed in two portions: 


A hexadecimal display, where each byte is 
represented by its hexadecimal value, and an 
ASCII display, where the equivalent ASCII 
character for the byte is displayed. If there is no 
corresponding printable ASCII character, a 
period (.) is displayed. 
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Example 


m © NWO = 


Go Ol 


Each line of the display begins with an address 
followed by the hexadecimal contents of the 16 
bytes starting from the addressed location. The 
eighth and ninth bytes are separated by a 
hyphen (-). The right-hand columns display the 
equivalent ASCII values. Each line of the dis- 
play, except possibly the first, begins on a 16 
byte boundary. 


Enter D 100,110 <CR>. 
Lines 100H to 110H (inclusive) are displayed. 


Enter D <CR>. 


The 128 bytes starting from location 111H are 
displayed. 


Enter D200 <CR>. 


The 128 bytes starting from location 200H are 
displayed. 


Ww 


DEBUG 


EK (ENTER) 


Syntax 


address 


bytevalue 


Comments e@ 


Replaces the contents of memory locations at 
the byte address(es) specified. 


E address[,bytevalue[,bytevalue...]] 


the address of the location whose value is to be 
replaced; or the address of the first of a succes- 
sion of locations whose contents are to be 
replaced. If only an offset is specified, then the 
segment indicated by the DS register is 
assumed. 


the value that is to replace the contents of the 
specified address. The first bytevalue parameter 
will replace the contents of the location specified 
by the address parameter. A second bytevalue 
will replace the contents of the location follow- 
ing that specified by the address parameter, and 
so on. 


If the command is entered without the byte 
value list, then DEBUG displays the specified 
address and its contents. The Enter command 
then waits for you to perform one of the 
following: 


Replace the displayed bytevalue by entering 
another value. Enter the new value after the cur- 
rent value. If you enter an illegal value, or if you 
type more than two digits, the illegal or extra 
character is not echoed. 


Advance to the next byte by pressing 
<SPACE>. To change the value of this byte 
simply enter the value as described above. If you 
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advance beyond an eight-byte boundary, 
DEBUG starts a new display line with the 
address displayed at the start of the line. To 
advance to the next byte without changing the 
current byte, press <SPACE> again. 


To return to the previous byte enter hyphen (-). 
DEBUG then starts a new display line with the 
address of the byte you have returned to and its 
contents. You can then change the contents of 
this location as described above. To move back 
one byte further without changing this value, 
enter hyphen again, and another new display 
line will be generated. 


Terminate the Enter command by pressing 
<CR>. This key may be pressed in any byte 
position. 


If you specify byte values in the command line, 
then the first of these byte values will replace 
the contents of the location specified by the 
address parameter. Subsequent entries in the list 
of byte values will replace subsequent bytes in 
memory. 


Enter E100 <CR>. 


DEBUG displays something like 058D:0100 
CD... 


Enter 26. 


the value of location 100 is changed to 26 and 
DEBUG displays: 


058D:0100 CD.26_ 


DEBUG 


10 


11 
12 


13 
14 


Enter <SPACE>. 


The next byte (location 101) is displayed 
058D:0100 CD.26 20._ 


Enter <SPACE>. 


The next byte (location 102) is displayed 
058D:100 CD.26 20. 00._ 


Enter <->. 


The previous byte (location 101) is displayed on 
the next line 


058D:0100 CD.26 20. OO. 
058D:0101 20._ 


Enter 30 <CR>. 


The contents of location 101 are changed to 30 
and the Enter command is terminated. 


058D:0100 CD.26. 20. O00. 
058D:0101 20.30 


Enter E 200,26,0A, 19,23 <CR>. 
The contents of byte locations 200, 201, 202 


and 203 are changed to 26, 0A, 19 and 23, 
respectively. 
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F (FILL) 


Syntax 


range 


bytevalue 


Comments ® 


Example 1 
2 


Fills an area of memory with specified byte 
values. 


F range,bytevalue[,bytevalue...] 


the range of addresses whose contents are to be 
overwritten with the specified bytevalues. If only 
the offset is specified, then the segment indi- 
cated by the DS register is assumed. 


a two digit hexadecimal value that is to over- 
write the contents of the specified address(es). 


If the specified range contains more bytes than 
the list of byte values, then the list of byte values 
is repeated until the specified range is filled. 


If the list of byte values is longer than the speci- 
fied range, the extra byte values are ignored. 


Enter FO4BA:100L100,42,45,48,37,20 <CR>. 


DEBUG fills memory locations 04BA:100 to 
O4BA:1FF with the byte values specified. The 


five values are repeated until all 256 locations 
are filled. 


Ww 


DEBUG 


G (GO) 


Executes the program currently in memory, 
optionally halting at specified breakpoint(s) and 
displaying information about the system and 
program environment. 


Syntax G [=address][ ,address...] 
=address the address in memory at which program execu- 
tion is to start. “=” must be entered to distin- 


guish a start address from a breakpoint address. 


address the breakpoint address. You can specify up to 
ten breakpoints, in any order. 


Comments If you enter G without parameters, the program 
currently in memory is executed starting from 
the address specified by the CS and IP registers. 


If you specify the =address parameter, the con- 
tents of the CS and IP registers are changed to 
those specified by the =address parameter and 
the program in memory is executed, starting | 
from the address you specified. 


If you specify one or more breakpoint addresses, 

program execution stops at the first such 

address encountered and displays the contents 

of the registers, the state of the flags and the 

next instruction to be executed (see the Register 
rn command for a description of the display). 


e Ifonly an offset is entered for an address, the 
GO command assumes the segment in the CS 
register. 


DEBUG 
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If you enter more than ten breakpoints, DEBUG 
will display 


BP Error 


Before executing the program, the GO command 
replaces the contents of the breakpoint locations 
with an interrupt instruction (hexadecimal CC). 
Therefore, each breakpoint address that you 
specify must point to the first byte of an 8086 
instruction, or unpredictable results occur. 


When program execution halts at a breakpoint 
DEBUG restores the original values of all the 
specified breakpoint locations. However, if the 
program terminates normally (that is, not at a 
specified breakpoint), the original values are not 
restored. 


Note: Once a program has reached completion 
(DEBUG has displayed “Program terminated 
normally’’) you must reload the program before 
you can re-execute it. 


The stack segment must have six bytes avail- 
able at the stack pointer for this command, 
otherwise unpredictable results occur. This is 
because the GO command jumps into the user 
program with the IRET instruction. The flag, 
CS, and IP registers have to be pushed onto the 
stack in preparation for the IRET, taking up six 
bytes. 


i’ 


DEBUG 


Example 


1 


Enter G=200,1AF,141 <CR>. 


The program currently in memory is executed 
starting from location 200. Assuming location 
141 is encountered before 1AF, then the program 
halts at location 141 and the register and flag 
values are displayed along with the next 
instruction to be executed. If neither breakpoint 
location is encountered, then the program ter- 
minates normally. 


Enter G <CR>. 
If, in step two, the program had halted at 


location 141, then program execution continues 
from that address. 
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H (HEXARITHMETIC) 


Syntax 


value_a 


value_b 


Comments 


Example 
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1 


Calculates and displays the sum and the differ- 
ence of two hexadecimal values. 


H value_a,value_b 


The first of two hexadecimal values. 


The hexadecimal value that is to be added to or 
subtracted from value_a. 


The hexadecimal values may be up to four digits 
long. 


The Hex command displays two four-digit 
values: 


— the first is the result of adding value_b to 
value_a 


— thesecond is the result of subtracting value_b 
from value_a 


= 


Enter H19F,10A <CR>. 


DEBUG displays 
O2A9 0095 


Enter HFFFF,2 <CR>. 


DEBUG displays 
0001 FFFD 


DEBUG 


I INPUT) 
Inputs and displays (in hexadecimal) one byte 
from the specified port. 
Syntax I value 
value the address of the port that the byte is to be 
input from. 


Comments The port address can be up to 16 bits. 
Example 1 Enter I2F8. 


2 the byte at the addressed port is input and 
displayed. 
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L (LOAD) 


Loads a file or absolute disk blocks into memory. 


Syntax L [address[ drive,block,count]] 


address the address in memory at which the file or range 
of blocks is to be loaded. If only an offset is 
entered, then the segment indicated by the CS 
register is assumed. 


drive the drive from which disk blocks are to be 
loaded. For drive A you must enter 0, for drive B 
you must enter 1, etc. 


block the first of a range of blocks to be loaded from 
the disk specified by the drive parameter. 


count the number of blocks to be loaded. 


Comments e If all parameters are specified, then DEBUG 
loads blocks of information from disk into 
memory. 


e Ifyou enter L without parameters, or with just 
the address parameter, the file whose file control 
block is correctly formatted at location CS:5C is 
loaded into memory. The file control block at 
CS:5C is set either to the filespec specified when 
the DEBUG command was invoked, or to the 
filespec specified by the most recent ‘““Name”’ 
command. 


e The default location for programs to load is at 
CS:100. If you specify L and the address 
parameter, the file is loaded at the specified 
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Examples 


address unless it is a .EXE or .HEX file. In any 
case DEBUG sets the BX:CX registers to the 
number of bytes loaded. 


If the file has an EXE extension, then it is relo- 
cated to the load address specified in the header 
of the .EXE file. That is, the address parameter 
to the Load command is ignored. The header 
itself is stripped off the .E XE file before the file 
is loaded into memory. Thus the size of the .EXE 
file on disk will differ from its size in memory. 


If the file is a .HEX file, entering the Load com- 
mand with no parameters causes the file to be 
loaded starting at the address specified within 
the .HEX file. If the address parameter, 
however, is specified, then loading starts at the 
address which is the sum of the address 
specified and the address in the .HEX file. 


The following examples assume the system to be 
initially in MS-DOS. 


Enter debug <CR> 
Nb:file.com <CR> 
L <CR>. 


Debug is entered and the subsequent Name 
command sets the file control block at CS:5C to 
identify file “file.com” on the diskette inserted in 
drive B. The Load command then loads this file 
into memory starting at CS:100 (the default 
address). 


Enter debug b:file.ccom <CR> 
L300 <CR>. 


file.com is loaded into memory at location 
CS:100 by the DEBUG command. It is then 
relocated to CS:300 by the Load command. 


DEBUG 


M (MOVE) 


Syntax 


range 


address 


Comments 


Example 
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2 


Moves the contents of a specified range of 
memory addresses to the locations starting at a 
specified address. 


M range,address 


The area of memory whose contents are to be 
moved. If you only enter an offset, the segment 
indicated in the DS register is assumed. 


The start of the destination area. If you only 
enter an offset, then the segment indicated by 
the DS register is assumed. 


If the source and destination areas overlap, the 
move is performed without loss of data. 


The contents of the source area are not changed 
by the move, unless the destination area over- 
laps it. 


If you specify an address as the end of the 
range, you must only enter the offset. The seg- 
ment specified, or defaulted to, in the start 
address of the range is assumed. 


Enter MCS:100,110,CS:500 <CR> or 
MCS:100L11,CS:500 <CR>. 


The 17 bytes starting at location CS:100 are 
copied to the 17 bytes starting at location 
CS:500. 


Syntax 


filespec 


Comments 


DEBUG 


N (NAME) 


Provides file names for the Load and Write 
commands or file name parameters for the pro- 
gram to be debugged. 


N filespec[ ,filespec...] 


the file specifier of a file to be loaded into 
memory, written to diskette, or used as a file 
name parameter to the file currently in memory. 


The Name command can be used to provide: 


the name of the disk file to be loaded into 
memory by a subsequent Load command 


the name to be assigned to the file currently in 
memory when the file is subsequently written to 
disk 


file name parameters to the file in memory to be 
debugged. 


The first case enables you to specify the file you 
wish to debug after entering the DEBUG envi- 
ronment. That is, you can enter DEBUG without 
specifying parameters, then use the Name com- 
mand to name the disk file you wish to debug, 
then load the file into memory using the Load 
command. This has the same effect as entering 
the file name as the first parameter to the 
DEBUG command upon invocation. In either 
case the file control block for the file to be 
debugged is set up at location CS:5C and the file 
is loaded. 
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In the second case, the file is already in memory 
and the Name command sets up the file control 
block for the specified file name at location 
CS:5C. When a Write command is subsequently 
entered the file in memory is written to disk with 
the file name whose file control block is set up at 
location CS:5C. 


In the third case, the Name command provides 
file name parameters for the program currently 
in memory. Whatever file control block was set 
at CS:5C is replaced by that of the first such 
parameter. If a second file parameter is speci- 
fied, its file control block is set up at location 
CS:6C. Only two file control blocks are set up, 
although additional file name parameters may 
be included if required. All the specified — 
including any delimiters and switches that may 
have been typed — are placed in a save area at 
CS:81, with CS:80 containing a character count. 
Parameters specified in this way are analogous 
to file names specified in the argument list to the 
DEBUG command. 


Enter DEBUG <CR> 
Nb:file.com <CR> 
L <CR>. 


The system enters the DEBUG environment and 
FILE.COM resident on drive B has its file con- 
trol block set up at location CS:5C. The Load 
command subsequently loads this file into 
memory. 


This sequence has the same effect as entering 


“DEBUG b:file.com” 


DEBUG 


ys Enter Nb:newfile.com <CR> 
W <CR> 


The file control block is set up at location CS:5C 
for the file specifier “b:newfile.com’’. The subse- 
quent Write command writes the file currently in 
memory to drive B and names the file 
“newfile.com”. 


3 Enter DEBUG b:filel.com <CR> 
Nfile2.dat,file3.dat <CR> 
G <CR> 


The DEBUG command loads the file named 
“filel. com” from drive B to be debugged. The 
Name command sets up two file control blocks 
at locations CS:5C and CS:6C for the file specifi- 
ers b:file2.dat and b:file3.dat, respectively. These 
files then become parameters to filel. COM when 
the subsequent GO command executes file1- 
.COM. Therefore, the file is executed as if the fol- 
lowing command line had been typed: 


b:filel file2.dat file3.dat 


DEBUG 


Syntax 


value 


byte 


Example 
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1 
2 


O (OUTPUT) 


Sends a specified byte to an output port. 
O value,byte 


the address of the output port. It must be speci- 
fied in hexadecimal and can be up to 16 bits. 


a two-digit hexadecimal value to be sent to the 
specified port. 


O1E, 27 <CR> 


the byte value 27H is output to the port 1EH. 


DEBUG 


Q (QUIT) 


Terminates the DEBUG program. 


Syntax Q 


Comments The Quit command terminates the debugger 
without saving the file you are working on. Con- 
trol is returned to MS-DOS command mode. 


DEBUG 


R (REGISTER) 


Syntax 


register- 
name 


Comments 
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Displays the contents of the registers and flag 
settings, or displays the contents of a specified 
register with the option to change that value, or 
displays the flag settings with the option of 
reversing any number of those settings. 


R [register-name pipe: F'] 


any valid register name whose contents are to be 
examined and optionally changed. This may be 
one of: 


AX DX SI _ ES _ IP 
BX SP DI SS PC 
CX BP DS CS 


Note: IP and PC both refer to the Instruction 
Pointer. 


the flag settings are to be displayed and option- 
ally changed. 


If you enter R without parameters, then the con- 
tents of all registers are displayed along with the 
flag settings and the next instruction to be exe- 
cuted. For Example: 


AX=058D BX=0000 CS=0000 DX=0000 
SP=FFFO BP=0000 SI=0000 DI=0000 DS=058D 
ES=058D CS=058D IP=013B 

NV UP EI PLNZNA PO NC 

058D:013B 83D8 MOV DS,AX 


If you enter R with a register name, then 
DEBUG displays the contents of that register. 
The command then waits for you to do one of 
the following: 


DEBUG 


— press <CR> to terminate the Register 
command without changing the value of the 
displayed register. 


— change the value of the register by entering 
the four-digit hexadecimal value, then 
terminate the Register command by entering 
<—Uh>. 


The valid flag values are shown in the following 
table: 


Flag Name Set Clear 
Overflow OV (yes) NV (no) 
Direction DN (decrement) UP (increment) 
Interrupt EI (enabled) DI (disabled) 
Sign NG (negative) PL (plus) 

Zero ZR (yes) NZ (no) 
Auxiliary AC (yes) NA (no) 
Carry 

Parity PE (even) PO (odd) 
Carry CY (yes) NC (no) 


If you enter RF, then the current flag settings 
are displayed. You can then either 


— press <CR> to terminate the Register 
command without changing the flag values, 
or 


— change the setting of one or more flags by 
entering the alternate value of the 
appropriate flags. The new values may be 
entered in any order, with or without 
delimiters. 


DEBUG 


Example 1 


11 
12 
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Enter R <CR>. 

DEBUG displays the contents of all registers, 
flag settings and the next instruction to be exe- 
cuted. 


Enter RIP <CR>. 


DEBUG displays the contents of the Instruction 
Pointer. For example: 


iP Ols?9 


Enter 0138 <CR>. 


the contents of the Instruction Pointer are 
changed to 0138. 


Enter RF <CR>. 


DEBUG displays the flag settings. For example: 


NV UP EI PL NZ NA PO NC- 
Enter PE ZR DI NG<CR>. 
The Parity flag is set to even (PE), the Zero flag 
is set (ZR), the Interrupt flag is cleared (DI), and 
the Sign flag is set (NG). 
Enter RF <CR>. 


DEBUG displays the new state of the flags 
NV UP DI NG ZR NA PE NC-:- 


DEBUG 


S (SEARCH) 


a 


list 


Comments 


Example 


1 


2 


Searches a specified range for a list of bytes. 


S range, list 


the range of addresses within which the search 
is to be made. If you only enter the offset, the 
segment indicated by the DS register is 
assumed. 


the list of one or more bytes to be searched for. 
Bytes in the list must be separated by a space or 
a comma. 


For each occurrence of the list of bytes within 
the specified range, DEBUG returns the address 
of the first byte. If no address is returned, no 
match was found. 


Enter S100L100,20 <CR> or 
S100,1FF,20 <CR>. 


DEBUG displays the address of every occur- 
rence of byte value 20 in the address range 100 
to 1FF’, inclusive, for example: 


O58D: 010C 
O58D: 0110 
O58D: 0115 
O58D: 0118 
O58D: 0120 
O58D: 0128 
O58D: O1CE 


DEBUG 


T (TRACE) 
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Executes one or more instructions and displays 
the register contents, flag settings and the next 
instruction to be executed. 


Syntax T [=address][, value] 

= address DEBUG is to commence execution at this 
address. 

value the number of instructions to be executed. 

Comments If the =address parameter is not specified, execu- 
tion begins at CS:IP. 


If the value parameter is not specified, only one 
instruction is executed. 


The display generated is of the same format as 
that of the Register command (without 
parameters). 


Example ll Enter T = 200,5 <CR>. 


Five instructions, starting with the one at loca- 
tion CS:200, are executed, and the register and 
flag values following each instruction are 
displayed along with the next instruction to be 
executed. 


3 Enter T<CR>. 
4. The instruction pointed to by CS:IP is executed 


and the register and flag contents are displayed 
along with the next instruction to be executed. 
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U (UNASSEMBLE) 
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Syntax 


range 


address 


Comments @ 


Disassembles strings of bytes in memory and 
displays them as assembler-like statements 
along with their corresponding addresses. 


U [range] 
or 


U [address] 


the range of addresses whose byte values are to 
be disassembled. If you do not specify the seg- 
ment, then the segment indicated by the CS reg- 
ister is assumed. 


the start of a 32 byte area of memory to be dis- 
assembled. If you only enter an offset, then the 
segment indicated by the CS register is 
assumed. 


If neither the range nor address parameter is 
specified, then 32 bytes are disassembled start- 
ing at location CS:IP. If the Unassemble 
command is given more than once, each 
subsequent invocation starts at the address 
following the last disassembled location. 


The number of bytes disassembled may be 
slightly more than the number you specified. 
This is because instructions are not always the 
same length and the final address in a range 
will not always contain the last byte of an 
instruction. 


The first address of a range, or the address 
parameter, must always refer to the first byte of 
an 8086 instruction, otherwise results are 
unpredictable. 


DEBUG 


Example 1 Enter UOS8D:204L8 <CR>. 


2 Eight bytes starting at location 058D:204 are 
disassembled and the result displayed: 


058D:0204 8D16DFOD LEA DxX,[ODDF] 
058D:0208 42 INC DX 
058D:0209 O3DO ADD DX,AX 
O58D:020B 8916E50B MOV [OBES5],DX 
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W (WRITE) 


Syntax 


address 


drive 


block 


count 


Comments @ 


Writes the file being debugged to disk. 
W [address[,drive,block,count] 


the start address of the code in memory that is 
to be written to disk. If you enter only an offset, 
then the segment indicated in the CS register is 
assumed. 


the drive containing the specified blocks to 
which code in memory is to be written. For drive 
A you must enter 0, for drive B you must enter 1, 
etc. 


the block number on disk that is the first of a 
contiguous range of blocks to be overwritten 
with code from memory. 


the number of disk blocks to be overwritten with 
code from memory. 


If you enter the WRITE command without 
parameters, then the file is written to disk start- 
ing from memory address CS:100. If you specify 
the address parameter, then the file in memory, 
starting from the specified address, is written to 
disk. 


In either case, before executing the WRITE 
command, BX:CX must be set to the number of 
bytes to be written if the count parameter is not 
included. This value was set up correctly when 
the file was loaded (either by the Load command 
or the DEBUG command itself). However, if, 
since loading the file, you have executed a GO or 
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TRACE command, then the value of BX:CX will 
have been changed. Be sure this value is set up 
correctly. 


e When the WRITE command writes a file to disk, 
it obtains the drive specifier and file name via 
the file control block set up at CS:5C. If no drive 
specifier is set up, then the default is assumed. 
This file control block is set up either by the 
DEBUG command (for the file you specify as a 
parameter to DEBUG) or by a subsequent 
NAME command. [f it does not indicate the file 
specifier you require, you must set up this file 
control block using the NAME command. Refer 
to “Memory Maps, Control Blocks, and Diskette 
Allocation” for further details. 


e When the file is written to disk it overwrites the 
version currently on disk unless the specified file 
name does not exist, in which case a new file is 
created. 


e If all parameters are specified, then the code in 
memory is written to the drive specified by the 
parameter. The data to be written starts at the 
memory location specified by the address 
parameter, and is written to the blocks on the 
disk specified by the block and count parame- 
ters. Be extremely careful to correctly specify the 
blocks, since information stored there previously 
will be destroyed by this operation. 


Examples 1 Enter W<CR>. 


The file in memory, starting from location 
CS:100, is written to disk with the file specifier 
defined by the file control block set up at 
location CS:5C. The number of bytes written is 
given by BX:CX. 
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DEBUG 


2 Enter W200 <CR>. 


The file in memory, starting from location 
CS:200, is written to disk with the file specifier 
defined by the file control block set up at loca- 
tion CS:5C. The number of bytes written is given 
by BX:CX. 


3 Enter W200,1,1F,20 <CR>. 


Blocks 1F through 3F on drive B are overwritten 
with the data starting at memory location 
CS:200. 
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DEBUG ERROR MESSAGES 


BF 


BP 


BR 


DF 
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Bad Flag a 


You attempted to alter a flag, but entered some 
characters that are not acceptable pairs of flag 
values. See R (Register) command for the list of 
acceptable flag entries. 


Too many Breakpoints 

You specified more than ten breakpoints as 
parameters to the GO command. Reenter the 
command with ten or fewer breakpoints. 


Bad Register 
You entered the R command with an invalid reg- 
ister name. 


Double Flag 
You entered two values for one flag. 
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Overview 


The 8086 microprocessor has an extremely flexible 
addressing scheme. The 8086 uses a 16-bit word, but 
can address a megabyte of memory. The 8086 sup- 
ports seven different addressing modes. 


To take advantage of the flexibility of the 8086, so 
that you can write assembly language code and navi- 
gate through programs while debugging, study the 
addressing scheme by carefully reading this chapter. 


WW 
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The AT&T Personal Computer 6300 utilizes the 
full address space that is available due to the 
design of the 8086 microprocessor. The 
addresses are 20 bits long, so the address space 
is two to the twentieth power, 1024K, or one 
megabyte. 


The 8086 has a 16-bit word. To convert 16-bit 
words to a 20-bit address, the 8086 uses “seg- 
mented addressing.” A 20-bit address is created 
by using values from two separate registers. 
Two 16-bit numbers are used. 


The binary representation of the first number is 
considered to have four binary zeroes tacked on 
to its end. This effectively multiplies the number 
by 16. This value is known as the segment por- 
tion of the address. The segment portion can 
point to any 16-byte segment of memory in the 
megabyte address space. However, with four 
zeroes as its least significant bits, it cannot 
“zero in” on individual bytes. The segment reg- 
ister’s function is just to point to a 16-byte bound- 
ary (also known as a paragraph boundary). 


Once a segment is located, the other register 
comes into play. This “offset register” points to 
the relative part of the address. The 16 bits that 
comprise the offset register point to an individ- 
ual byte which is relative to the start of the 
segment. 
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The 8086 locates a particular address by: 


1 Shifting the segment register to the left by four 
bits 


2 Adding the contents of the offset register 


The 20-bit address is conventionally expressed 
in special notation: 


Syntax <segment register>:<offset register> 
Example OO9F:0012 
Segment address OO9FO 
+ Relative address 0012 
= Actual Address OOAO02 
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Aligned and 
Non-Aligned Words 


The instructions for the 8086 are made up of 
from one to six bytes. Instructions can start at 
either an even or odd address. The 8086 is capa- 
ble of accessing two bytes of data in memory in 
a single memory cycle. When the CPU accesses 
a word (16 bits) located at an even address, it is 
accessing an “aligned” word. The word is 
aligned because both bytes are located at the 
same word address and can be accessed ina 
single memory cycle. 


When the CPU accesses a word starting at an 
odd address, it is accessing a “non-aligned” 
word. Since the two bytes comprising the word 
do not occupy the same word address, two 
memory cycles are required to read the entire 
word. 


The importance of aligned or non-aligned words 
is determined by the importance of execution 
speed in your application. It is good program- 
ming practice to store data starting at an even 
address. If your program accesses or manipu- 
lates many word quantities, this will help speed 
program execution. If you are writing a device 
driver and instruction cycle times affect the 
execution of your program, the impact of aligned 
and non-aligned words should be taken into 
consideration. 
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Registers and Flags 


There are two main groups of general registers 
used by the 8086: the data group and the pointer 
and index group. Each register is 16 bits wide. 


The data registers are AX, BX, CX, and DX. 
Each can be used as a single 16-bit register or as 
two 8-bit registers. When they are used as two 
8-bit registers, they are divided into an upper(H) 
and lower(L) half and called AH, AL, BH, BL, 
CH, CL, DH, and DL. 


The pointer and index registers are 16-bit regis- 
ters. They are named according to their func- 
tions: SP (stack pointer), BP (base pointer), SI 
(source index), and DI (destination index). 
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| ) Segment There are four segment registers in the 8086. 
Registers Each register is 16 bits and their names reflect 
their use: 


e CS — Code Segment 
Always defines the current code segment. 


e DS — Data Segment 
Usually defines the current data segment. 


e SS — Stack Segment 
Always defines the current stack segment. 


e ES — Extra Segment 
Can define an auxiliary data segment. 


| in These registers are used in combination with 

| other registers to form the 20-bit address. Each 
segment begins on a paragraph (16 byte) bound- 
ary. There are four “current” segments at any 
one time. The contents of each segment register 
is called the ‘segment base value’. The sections 
on “Code, Data, and Stack Segments” and 
“Addressing Modes” give details on how these 
registers are utilized. 


Instruction The instruction pointer (IP) is used in conjunc- 

Pointer tion with the Code Segment register to point to 
the address of the next executable instruction. 
The IP is also a 16-bit register. 


rf Flags The 8086 has nine 1-bit status or condition flags 
that are used to indicate the condition of the 
result of an arithmetic or logical operation that 
has just occurred. Some of the assembly lan- 
guage instructions use these flags to condition- 
ally change the execution path of a program. 
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Flag AF 


Definitions 


CF 


OF 


SF 


PF 


ZF 
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Auxiliary Carry Flag 
This flag is set (i.e., equal to 1) under two 
conditions: 


During addition there is a carry of the low 
nybble to the high nybble. (nybble = 4 bits) 


During subtraction there is a borrow from 
the low nybble to the high. 


Carry Flag 

This flag is set when there has been a carry 
or a borrow to the high-order bit of the (8- or 
16-bit) result of an operation. 


Overflow Flag 

When this flag is set, an arithmetic over- 
flow has occurred and a significant digit 
has been lost. 


Sign Flag 

This flag is set when the high-order bit of 
the result of an operation is a logical 1. 
Since negative binary numbers are 
represented using two’s complement 
notation, SF reflects the sign of the result: 0 
indicates a positive number and 1 indicates 
a negative number. 


Parity Flag 

If this flag is set, the result of the operation 
has an even number of ones in it. Use this 
flag to check for data transmission errors. 


Zero Flag 
This flag is set when the result of an opera- 
tion 1s zero. 
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Definitions 
(Cont’d) 


TF 


IF 


DF 


Trap Flag 

When set, the trap flag puts the system into 
single-step mode for the purposes of debug- 
ging. An internal interrupt is generated 
after each instruction so that you can 
inspect your program one instruction ata 
time. 


Interrupt-enable Flag 
If this flag is set, external (maskable) inter- 
rupts are recognized by the 8086. 


Direction Flag 

This flag is set and cleared by the STD (Set 
Direction Flag) and CLD (Clear Direction 
Flag) instructions. If it has the value 1, SI 
and DI are decremented during string move 
operations. If it has the value of 0, SI and 
DI are incremented during string move 
operations. This flag is used for the follow- 
ing instructions: MOVS, MOVSB, 
MOVSW, CMPS, CMPSB, and CMPSW. 


The flag register looks like this: 


Bit 15 14 18 12 1110 9 8 7 6 5 4 8 2 1 


onforr [else] [ar [rrr 


FLAGSh 


FLAGS1 
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Registers 
accumulator 
base 


count 


data 


stack pointer 
base pointer 
source index 


destination index 


instruction pointer 


flags 


code segment 
data seg 


extra seg 


stack seg 
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Code, Data, and 
Stack Segments 


Data 
Segment 


Extra 
Segment 


Stack 
Segment 


When you invoke a program, MS-DOS loads all 
of its segments into memory on paragraph 
boundaries. The segment registers are set to 
point to these locations. The data, code, and 
stack segments aren’t necessarily far apart in 
memory; they may, in fact, overlap. Each seg- 
ment may be up to 64 KB in length. 


Programs are limited to 64K of code, unless they 
change the value in the CS register. If a pro- 
gram changes the CS register, it may address up 
to 1024K of code. 


The CS register is modified by the FAR CALL 
and FAR RETurn ins:: uctions. Use these 
instructions to execute code that is located out- 
side the bounds of the current segment. 


Most programs use a maximum of 64 KB of 
memory for data. This includes Pascal and 
compiled BASIC. Assembly language programs, 
however, can use additional memory for data by 
employing the Extra Segment. 


The extra segment may be used in any manner 
you wish but is often used for transferring large 
blocks of data quickly in memory or as a storage 
area for a second stack. 


Stacks are used for temporarily storing register 
contents and other important values under these 
conditions: 


Interrupts 
Inter-segment calls 
One program calls another 
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General 
Comments 


Immediate 
Addressing 


Register 
Addressing 


4-12 


The flexible architecture of the 8086 supports 
many different memory-addressing modes. 
These can be broken down into six main types of 
addressing: immediate, register, direct, register 
indirect, and two kinds of calculated addressing. 
The following section discusses these modes and 
concerns the nature of the operand. 


In the immediate addressing mode, the operand 
appears in the instruction. For example, 


MOV AX,333 


moves the constant value 333 into the AX 
register. 


The register addressing mode uses the contents 
of one of the registers as the operand for the 
instruction. The instruction can specify that 
either 8 bits or 16 bits are to be manipulated. For 
example: 


MOV AX,BX _ ;moves 16 bits from BX to AX 


MOV AL,BL_ ;moves 8 bits from BL to AL 


Direct 
Addressing 


Register 
Indirect 
Addressing 
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The direct addressing mode specifies a location 
in memory whose contents are used as the ope- 
rand for the instruction. Example: 


MOV CX,COUNT 


This instruction uses the value found in the 
memory location designated by the symbol 
COUNT. Unless otherwise specified, COUNT is 
expected to be somewhere in the Data Segment. 
To specify that the operand is located in a seg- 
ment other than the data segment, use the 
“segment override prefix:” 


MOV CX,ES:COUNT 


This syntax specifies that COUNT is located in 
the Extra Segment. 


With the register indirect addressing mode, the 
16-bit offset address is contained in a base or 
index register. That is, the offset address resides 
in the BX, BP, SI, or DI register. Example: 


MOV AX,[SI] 


The 16-bit offset contained in the SI register is 
combined with the data segment register to 
compute the 20-bit address of the operand to 
move into register AX. Which segment register 
is used to compute the address depends on which 
instruction you are using (i.e., data segment or 
segment override for MOV, code segment for 

J MP or CALL, etc.). 
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Modes 
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The calculated addressing modes are like a com- 
bination of register indirect mode and direct 
addressing mode. There are two calculated 
addressing modes: single index and double 
index. In single index addressing, a 16-bit offset 
from the BX, BP, SI or DI register is added to an 
offset location in memory specified in the in- 
struction. The combined value of these two items 
provides the offset into memory from which the 
operand is fetched. If the BP register is used the 
offset is from within the stack segment; other- 
wise the offset is from within the data segment. 
As always, use of a segment override prefix can 
change this. Examples: 


MOV AX, COUNT[DI] 
MOV AX, RECORD[BP] 


In double index calculated addressing mode, 
values from two 16-bit registers are added to an 
optionally specified location in memory to pro- 
duce the final offset. Either the BX or BP regis- 
ter is used for one of the register values, and the 
SI or DI register is used for the other one. If only 
two registers are given with no memory location, 
the memory location defaults to 0000 (start of 
segment). Once again, the default calculation is 
from the stack segment if the BP register is 
used; if BX is used the default is from the data 
segment. Examples: 


MOV AX, COUNT[BX+SI] 
MOV AX, RECORD[BP] [DI] 
MOV AX, [BX] [DI] 
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e Overview 

e The Address Space 

e Low Memory Map 

e ROM BIOS Data Area 
e File Control Blocks 

e ASCIIZ Strings 

e Handles 

e Diskette Layout 


e Diskette Directory 
e File Allocation Table 


e Diskette Formats 
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Overview 


The purpose of this chapter is to enable you to 
locate items in memory or on diskette for the 
purposes of programming and debugging. 


The first portion of the chapter contains detailed 
memory maps of the RAM and ROM memory 
areas. The sections on control blocks deal with 
program file formats and I/O data structures. 
The last part of this chapter describes how data 
is organized on the diskette. 


id 


Hex 
00000 


04000 
08000 


A0000 
B0000 
B8000 
C8000 
F'0000 
FCO000 


Decimal 
OK 


16K 
32K 


640K 
704K 
736K 
800K 
960K 
1008K 


Memory Maps 
Control Blocks 
Diskette Allocation 


The Address Space 


Contents 


Interrupt vectors (see detail in low memory 
map) 


DOS software 


Language, applications programs and 
data 


Note: There is at least 98,000 hex or 608K 
of address space reserved for user pro- 
grams and data. To take advantage of the 
full amount, you must have purchased and 
installed the physical memory. 


Reserved for extended graphics 
Monochrome display buffer — Not used 
Color/graphics display buffer(s) 

Fixed disk adapter’s ROM (Optional) 
Reserved for ROM expansion 

ROM BIOS 
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Low Memory Map 


Hexadecimal addresses are in segment:offset format. 


Hex Decimal Contents 

0:0000 0 Interrupt vectors 0 - 7 
8259 interrupt controller vectors (8-F) 

0:0040 64 

0:0080 128 BIOS interrupt vectors 10-1F 

0:0100 O56 MS-DOS interrupt vectors 20-3F 
Assignable interrupt vectors (40-FF) 
Note: These vectors may be assigned to 
non-Intel hardware and software 

0:0400 1024 pe 


ROM BIOS data area (also called BIOS 


communications area) See map on next 


0:0500 1280 sc 
DOS data area (also called DOS com- 


0:0600 1536 munications area) 
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ROM BIOS Data Area 


Hex addresses are in segment:offset format. 


Hex 
0:0400 


0:0417 
0:043E 
0:0449 


0:0467 
tn 0:0471 


0:0488 
0:0500 


Decimal 
1024 


1047 


1086 


1097 


1127 


1137 


1160 
1280 


Contents 


Hardware environment parameters 
(printer and RS232C device addresses, 
memory size, etc.) 


Keyboard buffer and status bytes 
Floppy and hard disk status bytes 


Video display area (current mode, color 
pallette, cursor position, active page 
numbers, etc.) 


Data area for option ROM and 8253 
timer chip 


Fixed disk, I/O timeouts, and more key- 


board status information 
RESERVED 


Inter-applications communications area 
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File Control Blocks 
FCB The standard File Control Block (FCB) contains 
Format 37 bytes of file control information. The extend- 


ed File Control Block is used to create or search 
for files in the disk directory that have special 
attributes. If the extended FCB is used, it adds a 
7-byte prefix to the standard FCB. 


Any of the DOS functions which employ FCBs 
may use either an FCB or an extended FCB. 
(See chapter 7 for a description of each DOS 
function call.) 


If you are using an extended FCB, set the appro- 
priate register to the first byte of the prefix, not 
to the first byte of the standard FCB, before exe- 
cuting the function call. 
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(2) 
Filename (first 7 bytes) or Reserved 
Device Name 


Filename Record 
extension s1ze 


(*) (*) (*) 
File size File size Date of Time of 
(low part) (high part) last write last write 


\) 


Reserved for system use 


(1) FCB extension 
(2) Standard FCB 


(*) Areas with an asterisk are filled by DOS and must not be modified. 
Other areas must be filled by the using program. 
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Offsets are in decimal. 


Byte 
0 


1-8 


9-OB 


OC-OD 


OE-OF 
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Function 


Drive number 


Before open: 0 — default drive 
1 — drive A 
2 — drive B etc. 


After open: 1—driveA 
2— drive B etc. 


A 0 is replaced by the actual drive 
number when the file is opened. 


Filename, left-justified, padded with 
trailing blanks. If a reserved device 
name is placed here (e.g., LPT1,) do not 
include the optional colon. 


Filename extension, left-justified, with 
trailing blanks (may be all blanks). 


Current block number relative to the 
beginning of the file (starting at zero). 
A block is defined as a group of 128 
records. This field is set to 0 when the 
file is opened. This field and the Cur- 
rent Record field (offset 20H) make up 
the record pointer that is used for 
sequential reads and writes. 


Logical record size in bytes. Automati- 
cally set to 80H during open. If this is 
not correct, set it to the correct value. 


File size in bytes. The first word of the 
field is the low-order part of the size. 


ed 


Byte 
14-15 


16-17 


18-1F 


20 
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Function 


Date the file was created or last up- 
dated. The bits correspond to the date 
as follows: 


a 15 = 14 
1514181211109 8 76543 
yy yyyyymmmmdd 


yy = 0-119 (1980 to 2099) 
mm=1-12 
dd=1-31 


Time the file was created or last up- 
dated. The bits correspond to the time 
as follows: 


a 17 > = 16 => 
1514121211109 876543210 
hh hh ihmmmmmmsssss 


hh =0 - 23 

mm = 0-59 

ss = 0 - 30 (number of 2-second 
increments) 


Reserved for use by DOS. 


Current relative record number (0-127) 
within the current block. Set this field 
before doing sequential read/write 
operations; it is not initialized by the 
Open File function call. 


Relative record number; relative to the 
beginning of the file, starting with zero. 
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Byte Function 


This field is not initialized by the Open 
File function call and must be set before 
doing a random read or write. If the 
record size is less than 64 bytes, both 
words of the field are used; otherwise, 
only the first three bytes are used. 


Note: If you use the FCB at offset 5CH 
of the Program Segment Prefix, the last 
byte of the Relative Record field is the 
first byte of the unformatted parameter 
area that starts at offset 80H. This is 
the default Disk Transfer Address. 


Extended 
Control Byte Function 
Block ies ~~=~C«‘~sa en ee es ae 
FCB-7 Contains hex FF to indicate this 
is extended FCB. 


FCB-6 to Reserved 
FCB-2 


FCB-1 Attribute byte. 02 = Hidden file 
04 = System file 
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ASCIIZ Strings 


MS-DOS version 2.11 provides a set of new func- 
tion calls for file I/O that are easier to use than | 
the “traditional” calls that were used in past 

versions. These new calls do not utilize file con- 

trol blocks. To open a diskette file, you simply 

provide information to identify the file in the 

form of an ASCIIZ string. DOS returns a 

numeric value, a “handle”, that you use to refer 

to the file once you have opened it. 


The older function calls that require the use of 
file control blocks and do not utilize ASCIIZ 
strings and handles are supported in MS-DOS 
2.11 to provide upward compatibility. Use the 
newer function calls whenever possible. See 
Chapter 7 for details of function calls. 


An ASCIIZ string, also known as a pathname 
string, has the following format: an optional 
drive specifier, followed by a directory path, and 
where applicable, a filename. The last byte must 
be binary zeroes. For example: 


A:\LEVELA\LEVELB\FILEA 
(followed by a byte of zeroes) 


Either back slash (\) or forward slash (/) are 
valid path-separator characters. 
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Handles 


Several of the new function calls that support 
files or devices use an identifier known as a 
“handle” (also known as a “‘token’’). When you 
create or open a file or device with these function 
calls, a 16-bit value is returned in register AX. 
Use this handle to refer to the file after it has 
been opened. 


The following handles are pre-defined by DOS 
for your use. You need not open them before 
using them: 


0000 Standard input device 

0001 Standard output device 

0002 Standard error output device 
0003 Standard auxiliary device 
0004 Standard printer device 


Note: 
See your MS-DOS User’s Guide for information 
on redirecting I/O for the first two handles. 
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Diskette Layout 


Clusters 


The DOS area of the diskette is formatted as 
follows: 


Reserved Area — variable size 
First copy of file allocation table — variable size 


Second copy of file allocation table — variable 
size 


Root directory — variable size 


File data area 


Space for a file in the data area is not preallo- 
cated. The space is allocated one “cluster” at a 
time. A cluster consists of one or more consecu- 
tive sectors; all of the clusters for a file are 
“chained” together in the File Allocation Table 
(FAT). On diskettes formatted by MS-DOS 2.11, 
there are two copies of the FAT kept, for consis- 
tency. Should the disk develop a bad sector in 
the middle of the first FAT, the second is used 
as a backup. 
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Diskette Directory 


The FORMAT command builds the root direc- 
tory for all disks. Its location on disk and the 
maximum number of entries are dependent on 
the media. 


Since directories other than the root directory 
are regarded as files by MS-DOS, there is no 
limit to the number of files they may contain. 


All directory entries are 32 bytes in length, and 
are in the following format (byte offsets are in 


hexadecimal): 
Directory 0-7 Filename. Eight characters, left aligned 
Format and padded, if necessary, with blanks. If 


this is not currently a file directory entry, 
the first byte of this field indicates the 
status as follows: 


OOH The directory entry has never been 
used. This is used to mark the end of 
the allocated directory and limit the 
length of directory searches, for per- 
formance reasons. 

2EH The entry is for a directory (2EH is 
the ASCII code for the dot ‘.’ char- 
acter used to represent a directory). If 
the second byte is also 2EH (i.e., the 
entry is ‘..’), then the cluster field con- 
tains the cluster number of this direc- 
tory’s parent directory (OO00H if the 
parent directory is the root directory). 
Otherwise, bytes 01H through OAH 
are all spaces (i.e., the entry is ‘.’) and 
the cluster field contains the cluster 
number of this directory. 

E5H_ The file was used, but it has been 
erased. 

Any other character is the first character of 

a filename. 
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Filename extension. 


File attribute. The attribute byte is 
mapped as follows (values are in hex): 


O01 Fuileis marked read-only. An 
attempt to open the file for writing 
using the Open a File system call 
(Function Request 3DH) results in 
an error code being returned. This 
value can be used along with other 
values below. Attempts to delete the 
file with the Delete File system call 
(13H) or Delete a Directory Entry 
(41H) will also fail. 

02 Hidden file. The file is excluded 
from normal directory searches. 

04 System file. The file is excluded 
from normal directory searches. 

08 The entry contains the volume label 
in the first 11 bytes. The entry con- 
tains no other usable information 
(except date and time of creation), 
and may exist only in the root 
directory. 

10 The entry defines a sub-directory, 
and is excluded from normal direc- 
tory searches. 

20 Archive bit. The bit is set to “on” 
whenever the file has been written 
to and closed. It is used by 
BACKUP and RESTORE com- 
mands for determining whether or 
not a file has changed since its last 
backup. The BACKUP command 
clears this attribute on all files 
backed up. 


Memory Maps 


Control Blocks 
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Directory The system files (IO.SYS and 

Format MSDOS.SYS) are marked as read-only, 
(cont’d) hidden, and system files. Files can be 


marked hidden when they are created. 
Also, the read-only, hidden, system, and 
archive attributes may be changed 
through the Change Attributes system 
call (Function Request 43H). 


OC-15 Reserved. 


16-17 Time the file was created or last updated. 
The hour, minutes, and seconds are 
mapped into two bytes as follows: 


Offset 17H 
|H|H|H|H|H|M|M|M| 
( © ©@® 4 8B 2 1 QQ 
Offset 16H 
|M|M|M|S/S|{S]|S|S| 
f © 8 4 36 2 1 8 


is the number of hours (0-23) 

is the number of minutes (0-59) 
is the number of two-second 
increments 


m2 


The time is stored with the least signifi- 
cant bit first. 
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Directory 
Format 
(cont’d) 


18-19 


1A-1B 


Note: 


Date the file was created or last updated. 
The year, month, and day are mapped 
into two bytes as follows: 


Offset 19H 
|Y|Y|/Y/]Y]Y/]Y|Y|M 
7 6 6 4 8B 2d iYD 
Offset 18H 
|M|M|M/|D/|D|D|D{D 
7’ G6 5&5 4 82 2 1 0 


Y isthe number of years since 1980, 
0-119 (1980-2099) 

M_ isthe month number 1-12 

Dis the day of the month 1-31 


The date is stored with its least signifi- 
cant byte first. 


The cluster number of the first cluster in 
the file. The first cluster for data space 
on all disks is cluster 002. 


The cluster number is stored with the 
least significant byte first. 


Refer to “How to Use the File Allocation Table” 
for details on converting cluster numbers to logi- 
cal sector numbers. 


1C-1F 


File size in bytes. The first word of this 
four-byte field is the low-order part of the 
size. 
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FAT 
Entries 


File Allocation Table (FAT) 


The following information is included primarily 


for system programmers who are writing install- 


able device drivers. This section explains how 
MS-DOS uses the File Allocation Table to con- 
vert the clusters of a file to logical sector num- 
bers. The driver program is then responsible for 
locating the logical sector on disk. If you are 
writing a system utility, use the MS-DOS file 
management function calls for accessing files; 
programs that access the FAT directly are not 
guaranteed to be upwardly-compatible with 
future releases of MS-DOS. 


The File Allocation Table is an array of 12-bit 
entries (1.5 bytes) for each cluster on the disk. 


The first two FAT entries map a portion of the 
directory; these FAT entries indicate the size 
and format of the disk. 


The second and third bytes currently always 
contain FFH. 


The third FAT entry, which starts at byte offset 
4, begins the mapping of the data area (cluster 
002). Files in the data area are not always writ- 
ten sequentially on the disk. The data area is 
allocated one cluster at a time, skipping over 
clusters already allocated.The first free cluster 
found will be the next cluster allocated, regard- 
less of its physical location on the disk. This 
permits the most efficient utilization of disk 
space because clusters made available by eras- 
ing files can be allocated for new files. 
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Each FAT entry contains three hexadecimal 


characters: 
e (000 If the cluster is unused and avail- 
able. 
e@ FF7 The cluster has a bad sector in it. 


MS-DOS will not allocate such a 
cluster. CHKDSK counts the number 
of bad clusters for its report. These 
bad clusters are not part of any allo- 
cation chain. 


e FF8-FFF Indicates the last cluster of a file. 


@ XXX The cluster number of the next clus- 
ter in the file. The cluster number of 
the first cluster in the file is kept in 
the file’s directory entry. 


The File Allocation Table always begins on the 
first sector after the reserved sectors. If the FAT 
is larger than one sector, the sectors are contigu- 
ous. Two copies of the FAT are usually written 
for data integrity. The FAT is read into one of 
the MS-DOS buffers as needed (open, read, write, 
etc.). For performance reasons, this buffer is 
given a high priority so that it stays in memory 
as long as possible. 
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How to Use 
the File 
Allocation 
Table 
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Use the directory entry to find the starting clus- 
ter of the file. Next, to locate each subsequent 
cluster of the file: 


Multiply the cluster number just used by 1.5 
(each FAT entry is 1.5 bytes long). 


The whole part of the product is an offset into 
the FAT, pointing to the entry that maps the 
cluster just used. That entry contains the cluster 
number of the next cluster of the file. 


Use a MOV instruction to move the word at the 
calculated FAT offset into a register. 


If the last cluster used was an even number, 
keep the low-order 12 bits of the register by 
ANDing it with FFF; otherwise, keep the high- 
order 12 bits by shifting the register right 4 bits 
with a SHR instruction. 


If the resultant 12 bits are FF8H-FFFH, the file 
contains no more clusters. Otherwise, the 12 bits 


contain the cluster number of the next cluster in 
the file. 
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To convert the cluster to a logical sector number 
(relative sector, such as that used by Interrupts 
25H and 26H and by DEBUG): 


Subtract 2 from the cluster number. 


Multiply the result by the number of sectors per 
cluster. 


Add to this result the logical sector number of 
the beginning of the data area. 
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Diskette Formats 


On an MS-DOS disk, the clusters are arranged 
on diskette to minimize head movement for 
multi-sided media. All of the space on a track (or 
cylinder) is allocated before moving on to the 
next track. This is accomplished by using the 
sequential sectors on the lowest-numbered head, 
then all the sectors on the next head, and so on 
until all sectors on all heads of the track are 
used. The next sector to be used will be sector 1 
on head 0 of the next track. 


The first byte of the FAT, called the Media De- 
scriptor Byte, can sometimes be used to deter- 
mine the format of the disk. The following for- 
mats have been defined for the AT&T Personal 
Computer 6300, based on values of the first byte 
of the FAT. 
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MS-DOS No. sides 1 1 2 2 
Standard 
Diskette Tracks/side 40 40 40 40 
Formats Bytes/sector 512 512 512 512 
Sectors/track 8 9 8 9 
Sectors/cluster 1 1 2 2 
Reserved 
sectors 1 1 1 1 
No. FATs ys 2 2 2 
Root directory 
entries 64 64 112 112 
No. sectors 320 360 640 720 
Media 
Descriptor 
Byte FE FC FF FD 


Sectors for 
1 FAT 1 2 t 2 
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Program Structure 
and Loading 
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Overview 


This chapter describes the MS-DOS program file 
formats and procedures for loading them into 
memory. MS-DOS supports two main program 
file formats: .EXE and .COM. 


The .EXE format is the more flexible program 
type. An .EXE file is limited in size only by the 
amount of user memory installed in your 
system. 


Programs linked by MS-LINK are output in 
.EXE format. .E-XE files can be executed either 
by COMMAND.COM or by an EXEC system 
call (Function Request 4BH) in your program. 


A .COM program file cannot exceed 64K bytes 
in length. However, because it does not have the 
same lengthy header that an .EXE file does, a 
.COM file takes up less diskette storage space 
and loads into memory more quickly than an 
EXE file. 


After assembling and linking your program, it 
must be converted to .COM format. The easiest 
way to do this is with the EXE2BIN utility pro- 
vided on your MS-DOS Supplemental Programs 
diskette. 


ww 
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Pros and Cons for Selecting 
a Program File Format 


This section is concerned with the pros and cons 
of selecting between a .EXE program format and 
the .COM program type. 


PROS for .EXE 
e Can be larger than 64 K 
e Can cross segment boundaries 


e Can run .EXE immediately after linking, i.e., 
you need not take the extra step of running 


EXE2BIN 
e Can declare a stack segment in the assembly 
program 
CONS for .EXE 


e Disk file has large “header” containing reloca- 
tion information. .EXE therefore takes more 
space on disk and takes longer to load into 
memory at execution time. 
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PRO for .COM 
e .COM files are smaller and faster loading 
because .COM does not have a file header 
containing relocation information. 


CONS for .COM 
e .COM files can be no larger than one 64K 
segment. 


® .COM is segment-relocatable; the segment can 
be relocated at run time. However, all of the 
addresses in the program must be relative to the 
same segment address. 
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EXE2BIN 


EXE2BIN 


EXE2BIN is an executable program available 
on your MS-DOS system diskette. It converts 
programs that are in .EXE format (as they are 
after having been linked) into the .COM format. 


EXE2BIN can generate two types of .COM files: 
relocatable and non-relocatable. 
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Syntax EXE2BIN <input filename> <output file 
name> 


Both file names are in the form: 


[d:][path ][filename[.ext]] 


Example EXE2BIN B:PROG.EXE B:PROG.COM 


Discussion In specifying the input file, everything except 
the file name is optional. If you do not specify a 
drive, the default is used. If you do not specify a 
path, the default path is used. If you do not spec- 
ify an extension, the default is EXE. The input 
file is converted to .COM file format (memory 
image of the program) and placed in the output 
file. 


You are not required to enter any part of the 
output file specification. If you do not specify a 
drive, the drive of the input file will be used. If 
you do not specify an output path or filename, 
the input path or filename will be used. If you do 
not specify a filename extension in the output 
filename, the new file will be given an extension 
of .BIN. 


The input file must be in valid .EXE format pro- 
duced by the linker. The resident, or actual code 
and data part of the file must be less than 64K. 
There must be no STACK segment. 
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Two kinds of conversions are possible, depend- 
ing on the initial CS:IP (Code Segment: Instruc- 
tion Pointer) specified in the .EXE file: 


If CS:IP is specified as 0000:100H, it is assumed 
that the file is to be run as a .COM file with the 
location pointer set at 100H by the assembler 
statement ORG; the first 100H bytes of the file 
are deleted. No segment address fixups (that is, 
instructions that contain a reference to an abso- 
lute segment address) are allowed, as .COM files 
must be segment relocatable. Once the conver- 
sion is complete, rename the resulting file with a 
-COM extension. The command processor can 
load and execute the program in the same way 
as the .COM programs supplied on your MS- 
DOS diskettes. 


If CS:IP is not specified in the .EXE file, a pure 
binary conversion is assumed. If segment fixups 
are necessary (1.e., the program contains instruc- 
tions requiring a segment address), you are 
prompted for the fixup value. This value is the 
absolute segment at which the program is to be 
loaded. The resulting program is usable only 
when loaded at the absolute memory address 
specified by your application. The command 
processor is not capable of properly loading the 
program. This is the case when writing a .BIN 
program to use in an application such as a 
device driver that is always loaded at the same 
absolute address. 


Program Structure 
and Loading 


EXE2BIN 
Messages 


Amount read less than size in header 
The program portion of the file was smaller than 
indicated in the file’s header. You should reas- 
semble and relink your program. 


File cannot be converted 
CS:IP does not meet either of the criteria speci- 
fied above, or it meets the .COM file criterion but 
has segment fixups. This message is also dis- 
played if the file is not a valid executable file. 


File creation error 
EXE2BIN cannot create the output file. Run 
CHKDSK to determine if the directory is full or 
if some other condition caused the error. 


File not found 
The file is not on the diskette specified. 


Fixups needed - base segment (hex): 
The source (.E XE) file contained information 
indicating that a load segment is required for 
the file. Specify the absolute segment address at 
which the finished module is to be located. 
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Insufficient disk space 


There is not enough disk space to create a new 
file. 


Insufficient memory 
There is not enough memory to run EXE2BIN. 


WARNING - Read error in EXE file 
Amount read less than size in header. This is a 
warning message only. However, it is usually a 
good idea to reassemble and relink your source 
program when this message appears. 
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and Loading 
File Header Format 
The .EXE files produced by MS-LINK consist of 
two parts: 
e Control and relocation information 
e The load module 


The control and relocation information is at the 
beginning of the file in an area called the 
header. The load module immediately follows 
the header. 


Note: 
.COM files do not have file headers. 
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The header is formatted as follows (offsets are in 
hexadecimal): 


Offset Contents 
00-01 Must contain 4DH, 5AH. 


02-03 | Number of bytes contained in last 
page; used for reading overlays. 


04-05 Size of the file in 512-byte pages, 
including the header. 


06-07 Number of relocation entries in 
table. 


08-09 Size of the header in 16-byte para- 
o™ graphs. This is used to locate the 
beginning of the load module in 
the file. 


OA-OB Minimum number of 16-byte para- 
graphs required above the end of 
the loaded program (minalloc). 


0C-0D Maximum number of 16-byte para- 
graphs required above the end of 
the loaded program (maxalloc). If 
both minalloc and maxalloc are 0, 
then the program will be loaded as 
high as possible. 


Program Structure 
and Loading 
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10-11 


12-13 


14-15 


16-17 


18-19 


1A-1B 


Initial value to be loaded into stack 
segment before starting program 
execution. This must be adjusted 
by relocation. 


Value to be loaded into the SP reg- 
ister before starting program exe- 
cution. 


Negative sum of all the words in 
the file. 


Initial value to be loaded into the 
IP register before starting program 
execution. 


Initial value to be loaded into the 
CS register before starting pro- 
gram execution. This must be 
adjusted by relocation. 


Relative byte offset from beginning 
of run file to relocation table. 


The number of the overlays gener- 
ated by MS-LINK. 


This is followed by the relocation table. The 
table consists of a variable number of relocation 
items. Each relocation item contains two fields: 
a two-byte offset value, followed by a two-byte 
segment value. These two fields contain the 
offset into the load module of a word which 
requires modification before the module is given 


control. 
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Relocation Process for .EXE Files 


The following steps describe the relocation 
process: 


1 The formatted part of the header is read into 
memory. Its size is 1BH. 


2A portion of memory is allocated depending on 
the size of the load module and the allocation 
numbers (0A-0B and 0C-0D). MS-DOS attempts 
to allocate FFFFH paragraphs. This will always 
fail, returning the size of the largest free block. If 
this block is smaller than minalloc and loadsize, 
then there will be a no memory error. If this 
block is larger than maxalloc and loadsize, MS- 
DOS will allocate (maxalloc + loadsize). Other- 
wise, MS-DOS will allocate the largest free block 
of memory. 


3 A Program Segment Prefix is built in the lowest 
part of the allocated memory. 


4 The load module size is calculated by subtract- 
ing the header size from the file size. Offsets 04- 
05 and 08-09 can be used for this calculation. 
The actual size is downward-adjusted based on 
the contents of offsets 02-03. Based on the set- 
ting of the high/low loader switch, an appropri- 
ate segment is determined at which to load the 
load module. This segment is called the start 
segment. 
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The load module is read into memory beginning 
with the start segment. 


The relocation table items are read into a work 
area. 


Each relocation table item segment value is 
added to the start segment value. This calcu- 
lated segment, plus the relocation item offset 
value, points to a word in the load module to 
which is added the start segment value. The 
result is placed back into the word in the load 
module. 


Once all relocation items have been processed, 
the SS and SP registers are set from the values 
in the header. Then, the start segment value is 
added to SS. The ES and DS registers are set to 
the segment address of the Program Segment 
Prefix. The start segment value is added to the 
header CS register value. The result, along with 
the header IP value, is the initial CS:IP to 
transfer to before starting execution of the 
program. 


Program Structure 
and Loading 


Program Segment Prefix 


Unless you specify otherwise when linking your 
program, DOS loads your program in the lowest 
memory address available, immediately follow- 
ing the DOS code. This occurs whether the pro- 
gram loads as a result of your entering its name 
at the DOS prompt or through your use of the 
EXEC (4BH) function call. The area into which 
your program is loaded is called the Program 
Segment. 


DOS requires control information for each run- 
ning program: it builds a Program Segment 
Prefix and places it at offset 0 within the pro- 
gram segment. The Program Segment Prefix is 
hex 100 bytes long, so your program is loaded at 
relative address 100H. 
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Program Structure 
and Loading 


PSP Format 


HEX 0 


Length of program 
INT 20H Reserved |segment, in 
bytes 
8 
Terminate address CTRL-C exit 
(IP,CS) address(IP) 
10 
CTRL-C exit} Hard error exit address 
address(CS) (IP,CS) 


Used by DOS 


2CH 
5CH 


50 


Function dispatch call 


Formatted Parameter Area 1 formatted as standard 
unopened FCB 
6CH 


Formatted Parameter Area 2 formatted as standard 
unopened FCB (overlaid if FCB at 5CH is opened) 


80 
Unformatted Parameter Area 
(default Disk Transfer Area) 


100 
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Program Structure 
and Loading 


HEX 
OFFSET 


0 


80 


81 


CONTENTS 
Return address used by interrupt hex 20 


Segment address of allocatable memory following this 
program (If this program calls a memory management 
function to get more memory, this is its starting 
address.) 


Reserved 

Number of bytes in this program segment (2 byte value) 
Not used 

Terminate address : IP 

Terminate address : CS 

Ctrl break exit : IP 

Ctrl break exit : CS 

Critical error exit : IP 

Critical error exit : CS 


Segment address of the USED 
environment by DOS 


Code to call function dispatcher for 
DOS (INT 21H) interrupts 


Formatted parameter area 1: 
formatted as standard, unopened FCB 


Formatted parameter area 2: 
formatted as standard, unopened FCB 


Count of argument characters that These comprise 


follow the command name. the default DTA: 

Disk Transfer 
The argument characters Area(80H - FF'H) 
themselves. 
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Program Structure 


and Loading 


PSP 
Conditions 
upon 
Program 
Initiation 
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Program Loading Process 


When a program receives control, the following 
conditions are in effect: 


The segment address of the passed environment 
is contained at offset 2CH in the Program Seg- 
ment Prefix. The environment is a series of 
ASCII strings (totaling less than 32K) in the 
form: 


NAME = parameter 


Each string is terminated by a byte of zeros, and 
the set of strings is terminated by another byte 
of zeros. The environment built by the command 
processor contains at least a COMSPEC= string 
(the parameters on COMSPEC define the path 
used by MS-DOS to locate COMMAND.COM on 
disk). The last PATH and PROMPT commands 
issued will also be in the environment, along 
with any environment strings defined with the 
MS-DOS SET command. 


The environment that is passed is a copy of the 
invoking process environment. If your applica- 
tion uses a “keep process” concept, be aware 
that the copy of the environment passed to you 
is static. That is, it will not change even if sub- 
sequent SET, PATH, or PROMPT commands 
are issued. 


WO 


Program Structure 
and Loading 


SS EEE EE EEE ISD EY CTT TN EE I ITE, 

ae e Offset 50H in the Program Segment Prefix con- 
tains code to call the MS-DOS function dis- 
patcher. After correctly loading the registers, a 
program can issue a far call to offset 50H to 
invoke an MS-DOS function, rather than issuing 
an Interrupt 21H. Since this is a call and not an 
interrupt, MS-DOS may place any code appro- 
priate to making a system call at this position. 
This makes the process of calling the system 
portable. 


e The Disk Transfer Address (DTA) is set to 80H 
(default DTA in the Program Segment Prefix). 


e File control blocks at 5CH and 6CH are format- 
ted from the first two parameters typed when 
rr the command was entered. If either parameter 
contains a pathname, then the corresponding 
FCB contains only the valid drive number. The 
filename field will not be valid. 


e An unformatted parameter area at 81H contains 
all the characters typed after the command 
(including leading and imbedded delimiters), 
with the byte at 80H set to the number of char- 
acters. If the < or > parameters were typed on | 
the command line, they (and the filenames asso- 
ciated with them) do not appear in this area or 
in the character count; redirection of standard 
input and output is transparent to applications. 


e Offset 6 (one word) contains the number of bytes 
rr available in the segment. 


Program Structure 


and Loading 


Initial 
Conditions 
for .EXE 
Programs 
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Register AX indicates whether or not the drive 
specifiers (entered with the first two parameters) 
are valid, as follows: 


AL=FF if the first parameter contained an invalid 
drive specifier (otherwise AL=OO) 


AH=FF if the second parameter contained an 
invalid drive specifier (otherwise AH=OO) 


Offset 2 (one word) contains the segment 
address of the first byte of unavailable memory. 
Programs must not modify addresses beyond 
this point unless they were obtained by allocat- 
ing memory via the Allocate Memory system 
call (Function Request 48H). 


DS and ES registers are set to point to the Pro- 
gram Segment Prefix. 


CS, IP, SS, and SP registers are set to the values 
passed by MS-LINK. 


W 


Program Structure 
and Loading 


LL RS ETI RE ET I NEIL ELL LEE TE EIS EEE IE RT ELIS SI SEED EEN ERT TTS AT TREES 


Initial ® 
Conditions 
for .COM 
Programs 
oe 
8 
@ 


All four segment registers contain the segment 
address of the initial allocation block that starts 
with the Program Segment Prefix control block. 


The Instruction Pointer (IP) is set to 100H. 


The Stack Pointer register is set to the end of the 
program’s segment. The segment size at offset 6 
is reduced by 100H to allow for a stack of that 
size. 


A word of zeros is placed on top of the stack. 
This allows your program to exit to COM- 
MAND.COM by doing a RET instruction last. 
Make sure, however, to maintain your stack and 
code segments. 
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Program Structure 
and Loading 


Other Uses of In MS-DOS versions prior to 2.0, the PSP con- 
the Program tained the mechanism for program termination. 
Segment One of these four techniques had to be used to 
Prefix terminate your programs: 


1 A long jump to offset 0 in the Program Segment 
Prefix. 


2 By issuing an INT 20H with CS:0 pointing at 
the PSP. 


3 By issuing an INT 21H with register AH = 0 and 
CS:0 pointing at the PSP. 


4 Bya long call to location 50H in the Program 
Segment Prefix with AH = 0 and CS:0 pointing 
at the PSP. 


It is the responsibility of all programs to ensure 
that the CS register contains the segment 
address of the Program Segment Prefix when 
terminating via any of these methods. 


However, with the 2.0 Terminate a Process sys- 
tem call (Function Request 4CH), the CS register 
need not point to the Program Segment Prefix. 
For this reason, Function Request 4CH is the 
preferred method. It may be invoked by loading 
the AH register with 4CH and issuing an INT 
21H (or a long call to offset 50H in the Program 
Segment Prefix). 
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System Calls 


® Quick Reference: Functions and 
Interrupts 


e Overview 
e Programming Considerations 
e Interrupts 
e Functions 


® System Call Descriptions 
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System Calls 


Number 
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OOH 
O1H 


02H 
03H 
04H 
05H 
06H 
O7H 
08H 
O9H 
OAH 


OBH 
OCH 


ODH 
OEH 
OFH 
10H 
Lie 
12H 
13H 
14H 
Lon 
16H 
7A 
19H 
1AH 


21H 
22u 
23H 
24H 
20H 
27H 
28H 
29H 
2AH 
2BH 
2CH 
2DH 
2EH 
2FH 


Functions 


Function Name 


Terminate Program 
Read Keyboard and 
Echo 

Display Character 
Auxiliary Input 
Auxiliary Output 
Print Character 
Direct Console I/O 
Direct Console Input 
Read Keyboard 
Display String 
Buffered Keyboard 
Input 

Check Keyboard Status 
Flush Buffer, Read 
Keyboard 

Disk Reset 

Select Disk 

Open File 

Close File 

Search for First Entry 
Search for Next Entry 
Delete File 
Sequential Read 
Sequential Write 
Create File 

Rename File 
Current Disk 

Set Disk Transfer 
Address 

Random Read 
Random Write 

File Size 

Set Relative Record 
Set Vector 

Random Block Read 
Random Block Write 
Parse File Name 

Get Date 

Set Date 

Get Time 

Set Time 

Set/Reset Verify Flag 
Get Disk Transfer 
Address 


Number 
30H 


si 
33H 
35H 
36H 
38H 


39H 
3AH 
3BH 


3CH 
1B) 5 
3EH 
3FH 
40H 
41H 
42H 
43H 
44H 
45H 
46H 


47H 
48H 
49H 
4AH 
4BH 


4CH 
4DH 


4EH 
4¥FH 


54H 


56H 
o/H 


Function Name 


Get DOS Version 
Number 

Keep Process 

<CTRL C> Check 

Get Interrupt Vector 
Get Disk Free Space 
Return Country- 
Dependent Info. 

Create Sub-Directory 
Remove a Directory 
Change the Current 
Directory 

Create a File 

Open a File Handle 
Close a File Handle 
Read From File/Device 
Write to a File/Device 
Delete a Directory Entry 
Move a File Pointer 
Change Attributes 

I/O Control for Devices 
Duplicate a File Handle 
Force a Duplicate ofa 
Handle 

Return Name of Current 
Directory 

Allocate Memory 

Free Allocated Memory 
Modify Allocated 
Memory Blocks 

Load and Execute a 
Program (EXEC) 
Terminate a Process 
Retrieve the Return 
Code of a Child 

Find Match File 

Step Through a Di- 
rectory Matching Files 
Return Current Setting 
of Verity 

Move a Directory Entry 
Get/Set Date/Time of 
File 


Ww 


\ id 
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System Calls 


aE a ee RR TE ROE ESSE SE 


Function Name Number Function Name Number 
Allocate Memory 48H # Modify Allocated 
Auxiliary Input O3H Memory Blocks 4AH 
Auxiliary Output O4H #£=Movea Directory Entry 56H 
Buffered Keyboard Move a File Pointer 42H 
Input OAH Opena File Handle 3DH 
Change Attributes 43H Open File OFH 
Change the Current Parse File Name 29H 
Directory 3BH Print Character 05H 
Check Keyboard Status OBH Random Block Read 21 
Close a File Handle 3EH Random Block Write 28H 
Close File 10H Random Read Zin 
CTRL C Check 33H Random Write PAS | 
Create a File 3CH Read From File/Device 3FH 
Create File 16H # Read Keyboard 08H 
Create Sub-Directory 39H Read Keyboard and 
Current Disk 19H = Echo 01H 
Delete a Directory Entry 41H Remove a Directory 3AH 
Delete File 13H #£=Rename File L272 
Direct Console Input O7H Retrieve the Return 
Direct Console I/O O6H Code ofa Child 4DH 
Disk Reset ODH Return Current Setting 
Display Character O2H _—sodf‘' Verify 54H 
Display String OOH Return Country- 
Duplicate a File Handle 45H Dependent Info. 38H 
File Size 23H Return Name of Current 
Find Match File 4EH _ Directory 47H 
Flush Buffer, Read Search for First Entry 11H 
Keyboard OCH Search for Next Entry 12H 
Force a Duplicate of a Select Disk OEH 
Handle 46H Sequential Read 14H 
Free Allocated Memory 49H Sequential Write L8H 
Get Date 2AH Set Date 2BH 
Get Disk Free Space 36H ~~ Set Disk Transfer 
Get Disk Transfer Address 1AH 
Address 2FH Set Relative Record 24H 
Get DOS Version Set Time 2DH 
Number 30H Set Vector Zor 
Get Interrupt Vector 35H  Set/Reset Verify Flag 2EH 
Get Time 2CH Step Through a Di- 
Get/Set Date/Time of rectory Matching 4FH 
File 57H Terminate a Process 4CH 
I/O Control for Devices 44H Terminate Program OOH 
Keep Process 31H §# Write toa File/Device 40H 
Load and Execute a 
Program (EXEC) 4BH 
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System Calls 


Interrupts 
EM ee RS IE I GE RII 0 2 PES ES ES NY OE RE OS RE aR a 
Interrupts Interrupt Interrupt Nea 
(in Numerical (Hex) (Decimal) Description 
Order) 
20H 32 Program Terminate 
21H 33 Function Request 
22H 34 Terminate Address 
Zou Bo <CTRL C> Exit Address 
24H 36 Fatal Error Abort 
Address 
25H oF Absolute Disk Read 
26H 38 Absolute Disk Write 
27H 39 Terminate But Stay 
Resident 
28-40H 40-644 RESERVED — DO NOT 
USE 
Interrupts Interrupt Interrupt ad 
in Alphabetical Description in Hex in Dec 
Order 
Absolute Disk Read 25H oT 
Absolute Disk Write 26H 38 
<CTRL C> Exit Address 23H aD 
Fatal Error Abort 
Address 24H 36 
Function Request PAL | 33 
Program Terminate 20H 3 A 
RESERVED — DO NOT 
USE 28-40H 40-64 
Terminate Address 22H 34 
Terminate But Stay 
Resident Ziel 39 
Ned 
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System Calls 


Overview 


System Calls are procedures used to interface 
with I/O or to manage memory. They can be 
accessed from utility programs written in 
assembly language, and from some high level 
languages. Their use frees the programmer from 
having to perform primitive functions, and 
makes it easier to write machine-independent 
programs. 


MS-DOS provides two types of system calls: 
interrupts and function requests. This chapter 
describes the environments from which these 
routines can be called, how to call them, and the 
processing performed by each. 
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System Calls 


Programming Considerations 


Calling from 
Assembly 
Language 


Calling from 
GW BASIC 
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System calls can be invoked from Assembly 
Language, from GW BASIC, or from high-level 
languages like PASCAL and FORTRAN. This 
section describes the techniques for invoking 
calls and for returning control to MS-DOS. 


The system calls can be invoked from Assembly 
Language simply by moving any required data 
into registers and issuing an interrupt. Some of 
the calls destroy registers, so you may have to 
save registers before using a system call. 


The BLOAD and BSAVE commands are used 
for loading and saving machine language pro- 
grams. These are then called, using the CALL 
statement. 


The USR function calls an indicated machine 
language subroutine. The starting address of the 
subroutine must first be specified in a DEF USR 
statement. 


System Calls 


Interrupts 


MS-DOS reserves interrupts 20H through 3FH 
for its own use. The table of interrupt routine 
addresses (vectors) is maintained in locations 
80H-FCH. User programs should only issue 
Interrupts 20H, 21H, 25H, 26H, and 27H. (Func- 
tions Requests 4CH and 31H are the preferred 
method for Interrupts 20H and 27H for versions 
of MS-DOS that are 2.0 and higher. 


Interrupts 22H, 23H, and 24H are not interrupts 
that can be issued by user programs; they are 
simply locations where a segment and offset 
address are stored. For a discussion, see the sec- 
tion on Address Interrupts in this chapter. 


System Calls 


Functions 


Requirements Most of the MS-DOS function calls require input 
to be passed to them in registers. After setting 
the proper register values, the function may be 
invoked in one of the following ways: 


® Place the function number in AH and execute a 
long call to offset 50H in your Program Segment 
Prefix. Note that programs using this method 
will not operate correctly on versions of MS-DOS 
that are lower than 2.0. 


® Place the function number in AH and issue 
Interrupt 21H. All of the examples in this chap- 
ter use this method. 


e An additional method exists for programs that 
were written with different calling conventions. 
This method should be avoided for all new pro- 
grams. The function number is placed in the CL 
register and other registers are set according to 
the function specification. Then, an intraseg- 
ment call is made to location 5 in the current 
code segment. That location contains a long call 
to the MS-DOS function dispatcher. Register AX 
is always destroyed if this method is used; other- 
wise, it is the same as normal function calls. 
Note that this method is valid only for Function 
Requests 00H through 024H. 
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System Calls 


This chapter provides the following type of 
information for each DOS interrupt and func- 
tion call: 


e a description of the register contents required 
before the system call 


e a description of the register contents after the 
system call 


e adescription of the processing performed 


@ anexample of its use. 


Registers When MS-DOS takes control after a function 
call, it switches to an internal stack. Registers 
not used to return information (except AX) are 
preserved. The calling program’s stack must be 
large enough to accommodate the interrupt sys- 
tem — at least 128 bytes in addition to other 
needs. 


Note The macro definitions and extended example for 
MS-DOS system calls 00H through 2EH can be 
found at the end of this chapter. 
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System Calls 


System Call Descriptions 


Interrupts 
® 
@ 
& 
Programming 
Examples 
Note 
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The following are not true interrupts but rather 
storage locations for a segment and offset 
address: 


Terminate Address (Interrupt 22H) 
CTRL C Exit Address (Interrupt 23H) 
Fatal Error Abort Address (Interrupt 24H) 


The interrupts are issued by MS-DOS under the 
specified circumstance. You can change any of 
these addresses with Function Request 25H (Set 
Vector) if you prefer to write your own interrupt 
handlers. 


A macro is defined for most system calls, then 
used in some examples. In addition, a few other 
macros are defined for use in the examples. The 
use of macros allows the examples to be more 
complete programs, rather than isolated uses of 
the system calls. All macro definitions are listed 
at the end of the chapter. 


The examples are not intended to represent good 
programming practice. In particular, error check- 
ing and good human interface design have been 
sacrificed to conserve space. You may, however, 
find the macros a convenient way to include sys- 
tem calls in your assembly language programs. 


A detailed description of each system call follows. 


They are listed in numeric order; the interrupts 
are described first, then the function requests. 


Unless otherwise stated, all numbers in the sys- 
tem call descriptions, both text and code, are in 
hex. 


wo 


20H 
Program Terminate 


Call 


Return 


Remarks 


CS 
Segment address of Program Segment 
Prefix 


None 


All open file handles are closed and the disk 
cache is cleaned. The current process is termi- 
nated and control returns to the parent process. 
This interrupt is almost always used in old 
.COM files for termination. 


The CS register must contain the segment 
address of the Program Segment Prefix before 
you call this interrupt. 


The following exit addresses are restored from 
the Program Segment Prefix: 


Exit Address Offset 
Program Terminate OAH 
<CrRL CS OEH 
Critical Error 12H 


All file buffers are flushed to disk. 
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20H 


Program Terminate 


Note 


Macro 


Example 


Close all files that have changed in length 
before issuing this interrupt. If a changed file is 
not closed, its length is not recorded correctly in 
the directory. See Functions 10H and 3EH fora 
description of the Close File system calls. 


Interrupt 20H is provided for compatibility with 
versions of MS-DOS prior to 2.0. New programs 
should use Function Request 4CH, Terminate a 
Process. 


terminate macro 
int 20H 


endm 


‘CS must be equal to PSP values given at program 
istart 
‘(ES and DS values) 

INT 20H 


‘There is no return from this interrupt 


21H 
Function Request 


Call 


Return 


Remarks 


Note 


Example 


AH 
Function number 

Other registers as specified in 
individual function 


As specified in individual function 


The AH register must contain the number of the 
system function. See the following section on 
Function Requests, in this chapter, for a descrip- 
tion of the MS-DOS system functions. 


No macro is defined for this interrupt, because 
all function request descriptions in this chapter 
that define a macro include Interrupt 21H. 


To call the Get Time function: 


mov ah,2CH _ ;Get Time is Function 2CH 
int 21H ‘THIS INTERRUPT 
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22H 


Terminate Address 
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When a program terminates, control transfers to 
the address at offset OAH of the Program Seg- 
ment Prefix. This address is copied into the Pro- 
gram Segment Prefix, from the Interrupt 22H 
vector, when the segment is created. Interrupt 
22H, then, is just a storage location for an 
address rather than a true interrupt. 


23H 
<CTRL C> Exit Address 


If the user types CTRL C during keyboard input 
or display output, control transfers to the INT 
23H vector in the interrupt table. This address is 
copied into the Program Segment Prefix, from 
the Interrupt 23H vector, when the segment is 
created. 


If the CTRL C routine preserves all registers, it 
can end with an IRET instruction (return from 
interrupt) to continue program execution. When 
the interrupt occurs, all registers are set to the 
value they had when the original call to MS- 
DOS was made. There are no restrictions on 
what a CTRL C handler can do — including 
MS-DOS function calls — so long as the regis- 
ters are unchanged if IRET is use:l. 


If Function 09H or OAH (Display String or Buf- 
fered Keyboard Input) is interrupted by CTRL 
C, the three-byte sequence 03H-ODH-0AH (ETX- 
CR-LF) is sent to the display and the function 
resumes at the beginning of the next line. 


If the program creates a new segment and loads 
a second program that changes the CTRL C 
address, termination of the seconc program re- 
stores the CTRL C address to its value before 
execution of the second program. 


Like INT 22H, this is really not a true interrupt, 
but a storage location. 
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24H 


Fatal Error Abort Address 


Call 


Return 


Note 


Error Codes 


7-16 


If a fatal disk error occurs during execution of 
one of the disk I/O function calls, control 
transfers to the INT 24H vector in the vector 
table. This address is copied into the Program 
Segment Prefix, from the Interrupt 24H vector, 
when the segment is created. 


BP:SI contains the address of a Device Header 
Control Block from which additional informa- 
tion can be retrieved. 


Interrupt 24H is not issued if the failure occurs 
during execution of Interrupt 25H (Absolute 
Disk Read) or Interrupt 26H (Absolute Disk 
Write). These errors are usually handled by the 
MS-DOS error routine in COMMAND.COM that 
retries the disk operation, then gives the user the 
choice of aborting, retrying the operation, or 
ignoring the error. The following topics give you 
the information you need about interpreting the 
error codes, managing the registers and stack, 
and controlling the system’s response to the 
error 1n order to write your own error-handling 
routines. 


When an error-handling program gains control 
from Interrupt 24H, the AX and DI registers can 
contain codes that describe the error. If Bit 7 of 
AH is 1, the error is either a bad image of the 
File Allocation Table or an error which has oc- 
curred on a character device. The device header 
passed in BP:SI can be examined to determine 
which case exists. If the attribute byte high 
order bit indicates a block device, then the error 
was a bad FAT. Otherwise, the error is on a 
character device. 


24H 
Fatal Error Abort Address 


The following are error codes for Interrupt 24H: 


Error Code 
0 


QWMWPoeEnmraAMNARwWNeH 


Description 


Attempt to write on write 
protected disk 

Unknown unit 

Drive not ready 
Unknown command 
Data error 

Bad request structure length 
Seek error 

Unknown media type 
Sector not found 

Printer out of paper 

Write fault 

Read fault 

General failure 


The user stack will be in effect (the first item 
described below is at the top of the stack), and 
will contain the following from top to bottom: 


MS-DOS registers from 
issuing INT 24H 


User registers at time of original 
INT 21H request 


From the original INT 21H 
from the user to MS-DOS 


The registers are set such that if an IRET is exe- 
cuted, MS-DOS will respond according to (AL) 


as follows: 
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24H 


Fatal Error Abort Address 


Note 
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(AL) = 0 ignore the error 
= 1 retry the operation 
= 2 terminate the program via INT 23H 


Before giving this routine control for disk errors, 
MS-DOS performs five retries. 


For disk errors, this exit is taken only for errors 
occurring during an Interrupt 21H. It is not used 
for errors during Interrupts 25H or 26H. 


This routine is entered in a disabled state. 


The SS,SP,DS,ES,BX,CX, and DX registers must 
be preserved. 


The interrupt handler should refrain from using 
MS-DOS function calls. If necessary, it may use 
calls 01H through OCH. Use of any other call 
will destroy the MS-DOS stack and will leave 
MS-DOS in an unpredictable state. 


The interrupt handler must not change the con- 
tents of the device header. 


If the interrupt handler will handle errors rather 
than returning to MS-DOS, it should restore the 
application program’s registers from the stack, 
remove all but the last three words on the stack, 
then issue an IRET. This will return to the pro- 
gram immediately after the INT 21H that expe- 
rienced the error. Note that if this is done, MS- 
DOS will be in an unstable state until a function 
call higher than OCH is issued. 


25H 
Absolute Disk Read 


Call 


Return 


Remarks 


AL 
Drive number (0 = A, 1 = B, etc.) 
DS:BX 
Disk Transfer Address 
63.4 
Number of sectors 
DX 


Beginning relative sector 


Flags 
CF = 0if successful 
= 1 if not successful 
AL 
Error code if CF = 1 


This interrupt transfers control to the MS-DOS 
BIOS. The number of sectors specified in CX is 
read from the disk to the Disk Transfer Address. 
Its requirements and processing are identical to 
Interrupt 26H, except data is read rather than 
written. 


19 


25H 


Absolute Disk Read 


Note 


Macro 
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All registers except the segment registers are 
destroyed by this call. Be sure to save any regis- 
ters your program uses before issuing the 
interrupt. 


The system pushes the flags at the time of the 
call; they are still there upon return. (This is 
necessary because data is passed back in the 
flags). Be sure to pop the stack upon return to 
restore your stack pointer at the point of 
invocation. 


If the disk operation was successful, the Carry 


Flag (CF) is 0. If the disk operation was not suc- 


cessful, CF is 1 and AL contains the MS-DOS 
error code (see Interrupt 24H earlier in this sec- 
tion for the codes and their meaning). 


abs_disk_read macro disk, buffer,num_sectors, start 
mov al,disk 
mov bx,offset buffer 
mov cx,num_sectors 
mov. dx,start 
int 25H 


endm 


25H 
Absolute Disk Read 


Example The following program copies the contents of a 
single-sided disk in drive A: to the disk in drive 
B:. It uses a buffer of 32K bytes: 


prompt db “Source in A, target in B’,13,10 
db “Any key to start. $” 

start dw O 

buffer db 64 dup (512 dup (?)) ;64 sectors 


int_25H: display prompt ;see Function 09H 


read_kbd ‘see Function 08H 
mov cx,5 ‘copy 5 groups of 
‘64 sectors 
copy: push cx ‘save the loop 
;counter 
abs_disk_read O, buffer, 64,start ;THIS 
‘INTERRUPT 
abs_disk_write 1, buffer, 64,start ;see INT 
‘26H 
add start,64 ‘do the next 64 
;sectors 
pop cx ;restore the loop 
;counter 
loop copy 
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26H 


Absolute Disk Write 


Call 


Return 


Remarks 
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AL 
Drive number (0 = A, 1 = B, etc.) 
DS:BX 
Disk Transfer Address 
CX 
Number of sectors 
DX 
Beginning relative sector 


FLAGS 
CF = 0if successful 
= 1if not successful 
AL 
Error code if CF = 1 


This interrupt transfers control to the MS-DOS 
BIOS. The number of sectors specified in CX is 
written from the Disk Transfer Address to the 
disk. Its requirements and processing are identi- 
cal to Interrupt 25H, except data is written to the 
disk rather than read from it. 


26H 
Absolute Disk Write 


Note 


Macro 


All registers except the segment registers are 
destroyed by this call. Be sure to save any regis- 
ters your program uses before issuing the 
interrupt. 


The system pushes the flags at the time of the 
call; they are still there upon return. (This is 
necessary because data is passed back in the 
flags). Be sure to pop the stack upon return to 
restore your stack pointer at the point of 
invocation. 


If the disk operation was successful, the Carry 
Flag (CF) is 0. If the disk operation was not suc- 
cessful, CF is 1 and AL contains the MS-DOS 
error code (see Interrupt 24H earlier in this sec- 
tion for the codes and their meaning). 


abs_disk_write macro disk, buffer,num_sectors, start 
mov. al,disk 
mov. bx,offset buffer 
mov cx,num_sectors 
mov dx,start 
int 26H 


endm 
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26H 


Absolute Disk Write 


Example 
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The following program copies the contents of a 
single-sided disk in drive A: to the disk in drive 
B:, verifying each write. It uses a buffer of 32K 


bytes: 
off 


on 


prompt 
start 


buffer 


int_26H: 


copy: 


equ O 
equ l 


db “Source in A, target in B’, 13,10 


db “Any key to start. $’ 


dw O 


db 64 dup (512 dup (?)) ; 64 sectors 


display prompt 
read_kbd 

verify on 

mov cx,5 

push cx 

abs_disk_read O,buffer, 
abs_disk_write 1, buffer, 
add start,64 


pop cx 


loop copy 
verity off 


‘see Function 09H 
‘see Function 08H 
‘see Function 2EH 
‘copy 5 groups of 
‘64 sectors 

‘save the loop 
;counter 

64,start ;see INT 
Zor 

64,start ;THIS 
‘-INTERRUPT 

‘do the next 64 
‘sectors 

‘restore the loop 
;counter 


‘see Function 2EH 


27H 
Terminate But Stay Resident 


Call 


Return 


Remarks 


Macro 


CCS:DX 
First byte following 
last byte of code 


None 


The Terminate But Stay Resident call is used to 
make a piece of code remain resident in the sys- 
tem after its termination. Typically, this call is 
used in .COM files to allow some device-specific 
interrupt handler to remain resident to process 
asynchronous interrupts. 


DX must contain the number of bytes in the CS 
segment to be reserved. When Interrupt 27H is 
executed, the program terminates but is treated 
as an extension of MS-DOS; it remains resident 
and is not overlaid by other programs when it 
terminates. 


If an executable file whose extension is .COM or 
.EXE ends with this interrupt, it becomes a resi- 
dent operating system command. 


This interrupt is provided for compatibility with 
versions of MS-DOS prior to 2.0. New programs 
should use Function 31H, Keep Process. 


stay_resident macro last_instruc 
mov dx,offset last_instruc 


inc dx 
int 27H 
endm 
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27H 


Terminate But Stay Resident 


Example 
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;CS musi be equal to PSP values given at program 
;start 
(ES and DS values) 
‘the variable Last Address must be equal 
‘to the offset of the last byte in the 
;program. 
mov DX,LastAddress 
inc dx 
int 215 


‘There is no return from this interrupt 


OOH 
Terminate Program 


Call 


Return 


Remarks 


Warning 


AH = 00H 

CS 
Segment address of 
Program Segment Prefix 


None 


Function 00H is called by Interrupt 20H; it per- 
forms the same processing. 


The CS register must contain the segment 
address of the Program Segment Prefix before 
you call this interrupt. 


The following exit addresses are restored from 
the specified offsets in the Program Segment 
Prefix: 


Program terminate OAH 


<CTraRiC> OEH 
Critical error 12H 


All file buffers are flushed to disk. 


Close all files that have changed in length be- 
fore calling this function. If a changed file is not 
closed, its length is not recorded correctly in the 
directory. See Function 10H for a description of 
the Close File system call. 
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ee 


00H 
Terminate Program 


Macro terminate_program macro a | 
xor ah,ah 
int 21H 
endm 


Example ‘CS must be equal to PSP values given at program start 
‘(ES and DS values) 
mov ah,O 
int 2.8 
‘There are no returns from this interrupt 
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01H 
Read Keyboard and Echo 


ee ee CE ee ee) 


Call 


Return 


Remarks 


Macro 


Example 


AH = 01H 
AL 
Character typed 


Function 01H waits for a character to be typed 
at the keyboard, then echoes the character to the 
display and returns it in AL. If the character is 
CTRL C, Interrupt 23H is executed. 


read_kdb_and_echo macro 


mov ah,OlH 
int 21H 
endm 


The following program both displays and prints 
characters as they are typed. If CR is pressed, 
the program sends Line Feed-Carriage Return to 
both the display and the printer: 


func_OlH: read_kbd_and_ echo ‘THIS FUNCTION 
print_char al ‘see Function 05H 
cmp al,ODH ‘is ita CR? 
jne func_Ol1H ;no, print it 
print_char 10 ‘see Function 05H 
display_char 10 ‘see Function 02H 
jmp func_OlH ;get another character 


02H 
Display Character 


‘SIS eI RTS EASES AA RIDE ERIM GE Ti I ROBES OTT ES BELITTLE OEE SEITE EIT: 


Call AH = 02H 
DL 
Character to be displayed 


Return None 
Remarks If CTRL C is typed, Interrupt 23H is issued. 
Macro display_char macro character 
mov. dl,character 
mov ah,O2H 
int 21 
endm 
Example The following program converts lowercase char- 


acters to uppercase before displaying them: 


func_O2H: read_kbd ‘see FUNCTION O8H 
cmp. al,‘a’ 
jl uppercase ;don't convert 
cmp. al,“z’’ 
ig uppercase ;don’t convert 
sub al,20H ‘convert to ASCII code 


‘for uppercase 
uppercase: display_char al ‘THIS FUNCTION 
jmp func_O2H _ ;get another character 
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03H 
Auxiliary Input 


r~ ‘SSRIS SR Baa BS sa I RS ni he Sor ee ee 


Call 


Return 


Remarks 


Macro 


Example 


AH = 03H 


AL 
Character from auxiliary device 


Function 03H waits for a character from the 
auxiliary input device, then returns the 
character in AL. 


This system call does not return a status or error 
code. 


If a CTRL C has been typed at console input, 
Interrupt 23H is issued. 


aux_input macro 
mov ah,O3H 
int 21H 
endm 


The following program prints characters as they 
are received from the auxiliary device. It stops 
printing when an end-of-file character (ASCII 
26, or CTRL Z) is received: 


func_O3H: aux_input ‘THIS FUNCTION 
cmp al, lAH ‘end of file? 
je continue ‘yes, all done 
print_char al ‘see Function 05H 
jmp func_O3H ;get another character 


continue: 
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04H 


Auxiliary Output 


Call 


Return 


Remarks 


Macro 


Example 


string 


func_O4H: 


send_it: 


continue: 


AH = 04H 
DL 
Character for auxiliary device 


None 


This system call does not return a status or error 
code. 


If a CTRL C has been typed at console input, 
Interrupt 23H is issued. 


aux_output macro character 
mov. dl,character 
mov ah,04H 
int Zin 


endm 


The following program gets a series of strings of 
up to 80 bytes from the keyboard, sending each 
to the auxiliary device. It stops when a null 
string (CR only) is typed: 


db 82 dup(?) ‘see Function OAH 
get_string 80,string ‘see Function OAH 
cmp string[1],O ‘null string? 

je continue ‘yes, all done 

XOIr ch,ch -zero high byte 
mov cl, byte ptr string[1] ;get string length 
mov bx,0 ‘set index to O 
aux_output string[bx+2] ‘THIS FUNCTION 
inc bx ‘bump index 

loop send_it ‘send another character 
jmp func_04H ‘get another string 
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Call 


Return 


Remarks 


Macro 


05H 
Print Character 


Character for printer 


None 


If CTRL C has been typed at console input, 
Interrupt 23H is issued. 


print_char macro character 
mov dl,character 
mov ah,0O5H 
int 21H 


endm 
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05H 
Print Character 


Example The following program prints a walking test pat- 


line_num db 


func_O5H: mov 


tern on the printer. It stops if CTRL C is pressed. 
O 
bL33 ‘first printable ASCII 


‘character (!) 


add bl line_num __;to offset next character 

mov cx,80 ‘loop counter for line 
print_it: print_char bl ‘THIS FUNCTION 

inc bl move to next ASCII character 

cmp bl,126 ‘last printable ASCII 

‘character (~) 

jle no_reset ‘not there yet 

mov bLoo sstart over with (!) 
no_reset: loop print_it ‘print another character 

print_char 13 ‘carriage return 

print_char 10 line feed 

inc line_num ‘to offset lst char. of line 

cmp line_num, 93 ;end of cycle? 

jle func_O5H ‘nope, not yet 

mov line_num, O_ ;reset char offset 

jmp func_O5H -continue 
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06H 
Direct Console I/O 


Call 


Return 


Remarks 


Macro 


AH = 06H 
DL 
See Text 


AL 
If DL = FFH before call 
If Zero flag not set: 
Character from keyboard 
If Zero flag set: 
No character input 


Processing depends on the value in DL when the 
function is called: 


DL is FFH. 
If a character has been typed at the keyboard, 
it is returned in AL and the Zero flag is 0; if 
a character has not been typed, the Zero flag 
is 1. 


DL is not FFH. 
The character in DL is displayed. 


This function does not check for CTRL C. 


dir_console_io macro switch 
mov. dl,switch 
mov ah,06H 
int 21H 
endm 


06H 
Direct Console I/O 


Example The following program acts as a stopwatch. 
When a character is typed, it sets the system 
clock to zero and begins to continuously display 
the time. When a second character is typed the 
system stops updating the time display. 


time db“00:00:00.00",13, “$" 
ten db 10 


func_O6H: dir_console_io OFFH ‘THIS FUNCTION 


jz func_O6H ‘wait for keystroke 
set_time 0,0,0,0 ;see Function 2DH 
read_clock: get_time ‘see Function 2CH 
convert ch,ten,time ‘see end of chapter 
convert cl,ten,time[3] ‘see end of chapter 
convert dh,ten,time[6] ‘see end of chapter 
convert dl,ten,time[9] ‘see end of chapter 
display time ‘see Function 09H 
dir_console_io OFFH ‘THIS FUNCTION 
jz read_clock ‘no char, keep updating 


continue: 
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07H 
Direct Console Input 


Call 


Return 


Remarks 


Macro 


Example 


password 
prompt 


func_O7H: 


get_pass: 


continue: 


AH = 07H 
AL 
Character from keyboard 


This function does not echo the character or 
check for CTRL C. (For a keyboard input func- 
tion that echoes or checks for CTRL C, see 
Functions 01H or 08H.) 


dir_console_input macro 


mov ah,O7H 
int 2.4 
endm 


The following program fragment prompts for a 
password (8 characters maximum) and places 
the characters into a string without echoing 
them: 


db 8 dup(?) 

db “Password: $” ‘see Function O9H for 
‘explanation of $ 

display prompt ‘see Function 09H 

mov cx,8 ‘maximum length of password 

xor  bx,bx ‘so BL can be used as index 

dir_console_input ‘THIS FUNCTION 

cmp al,ODH ‘was ita CR? 

je continue ‘yes, all done 

mov password[bx],al ;no, put character in string 

inc bx ‘bump index 

loop get_pass ;get another character 


‘BX has length of password 
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08H 


Read Keyboard 


Call 


Return 


Remarks 


Macro 


Example 


password 
prompt 


func_O8H: 


get_pass: 


continue: 


AH = 08H 
AL 
Character from keyboard 


If CTRL C is pressed, Interrupt 23H is executed. 
This function does not echo the character. (For a 
keyboard input function that echoes the charac- 

ter or does not check for CTRL C, see Functions 
01H or 07H.) 


read_kbd macro 


mov ah,O8H 
int 21H 
endm 


The following program fragment prompts for a 
password (8 characters maximum) and places 
the characters into a string without echoing 
them: 


db 8 dup(?) 
db “Password: $” ‘see Function 09H 

‘tor explanation of $ 
display prompt ‘see Function 09H 
mov cx,8 ;maximum length of password 
xor  bx,bx ‘BL can be an index 
read_kbd; ‘THIS FUNCTION 
cmp al,ODH ‘was it a CR? 
je continue ‘yes, all done 
mov password[bx],al j;no, put char. in string 
inc bx ‘bump index 
loop get_pass ;get another character 


‘BX has length of password 
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09H 
Display String 


Call AH = 09H 
DS:DX 
String to be displayed 
Return None 
Remarks DX must contain the offset (from the segment 


address in DS) of a string that ends with “$”’. 
The string is displayed (the $ is not displayed). 


Macro display macro string 
mov dx,offset string 
mov ah,O9H 
int 21H 


endm 


Example The following program displays the hexadec- 
imal code of the key that is typed: 


table db “0123456789ABCDEF” 

sixteen db 16 

result db “-OOH”,.13,10,"S" ‘see text for 
‘explanation of $ 


func_O9H: read_kbd_and_echo ‘see Function 01H 
convert al,sixteen,result[1] ;see end of chapter 
display result ‘THIS FUNCTION 
jmp func_O9H ‘do it again 
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OAH 


Buffered Keyboard Input 


Call 


Return 


Remarks 


AH = 0AH 
DS:DX 
Input buffer 


None 


DX must contain the offset (from the segment 
address in DS) of an input buffer of the 
following form: 


Byte Contents 


1 Maximum number of characters in 
buffer, including the CR (you must set 
this value). 


2 Actual number of characters typed, not 
counting the CR (the function sets this 
value). 

3-n Buffer; must be at least as long as the 


number in byte 1. 


This function waits for characters to be typed. 
Characters are read from the keyboard and 
placed in the buffer beginning at the third byte 
until CR is pressed. If the buffer fills to one less 
than the maximum, additional characters typed 
are ignored and ASCII 7 (BEL) is sent to the 
display until CR is pressed. The string can be 
edited as it is being entered. If CTRL C is typed, 
Interrupt 23H is issued. 


The second byte of the buffer is set to the 
number of characters entered (not counting the 


CR). 
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f~ 


OAH 


Buffered Keyboard Input 


Macro 


Example 


get_string macro limit,string 
mov dx,offset string 


mov 
mov 
int 


endm 


string, limit 
ah,OAH 
21h 


The following program gets a 16-byte (max1- 


mum) string from the keyboard and fills a 24- 
line by 80-character screen with it: 


buffer 
max_length 
chars_entered 
string 
strings_per_line 


crlf 


func_OAH: 


display_screen: 


display_line: 


label 
db 
db 
db 
dw 


db 


byte 

? 

? 

17 dup (?) 
O 


13, 10, “ar 


get_string 17,buffer 


xXOr 


mov 
mov 
mov 


chow 
div 


XOI 
mov 
mov 
push cx 
mov 
display 
loop 
display 
pop 
loop 


bx, bx 


bl,chars_entered 
buffer[bx+2],"$" 
al,50H 


chars_entered 


ah,ah 
strings_per_line,ax 
cx, 24 


cx,strings_per_line 
string 

display_line 

erlf 

Cx 

display_screen 


‘maximum length 
‘number of chars. 
-16 chars + CR 
‘how many strings 
‘fit on line 


‘THIS FUNCTION 
‘so byte can be 
‘used as index 
‘get string length 
‘see Function 09H 
‘columns per line 


‘times string fits 
‘on line 

‘clear remainder 
‘save col. counter 
;row counter 
‘save it 

‘get col. counter 
‘see Function 09H 


‘see Function 09H 


‘get line counter 
‘display 1 more line 
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OBH 


Check Keyboard Status 
Call AH =0BH ~ 
Return AL 


Remarks Checks whether there are characters in the type- 
ahead buffer. If so, AL returns FFH; if not, AL 
returns 0). If CTRL C is in the buffer, Interrupt 
23H is executed. 

Macro check_kbd_status macro 

mov ah,OBH 
int 21H \ | 
endm 

Example The following program fragment continuously 
displays the time until any key is pressed. 

time db “00:00:00.00’,13,10, “$" 

ten db 10 

func_OBH: get_time ;see Function 2CH 
convert ch,ten,time ‘see end of chapter 
convert cl,ten,time[3] ;see end of chapter 
convert dh,ten,time[6] ;see end of chapter 
convert dl,ten,time[9]  ;see end of chapter 
display time ‘see Function 09H 
check_kbd_status ‘THIS FUNCTION 
cmp. al,OFFH shas a key been typed | 
je all_done ‘yes, go home 
jmp func_OBH ‘no, keep displaying 

;time 
all_done: 


FFH = characters in type-ahead buffer 
0 = no characters in type-ahead buffer 


OCH 
Flush Buffer, Read Keyboard 


Call 


Return 


Remarks 


Macro 


AH = 0CH 

AL 
1, 6, 7, 8, or OAH = The corresponding 
function is called. Any other value 
= return from function. 


AL 
0 = Type-ahead buffer was flushed; no 
other processing performed. 


The keyboard type-ahead buffer is emptied. 
Further processing depends on the value in AL 
when the function is called: 


1,6, 7, 8; or A: 
The corresponding MS-DOS function is 
executed. 


Any other value: 


No further processing; AL returns 0. 


flush_and_read_kbd macro switch 
mov al,switch 


mov ah,OCH 
int 241 
endm 
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OCH | 
Flush Buffer, Read Keyboard 


Example The following program both displays and prints 
characters as they are typed. If CR is pressed, 
the program sends Carriage Return-Line Feed to 
both the display and the printer. 


func_OCH: flush_and_read_kbd 1 


print_char al 

cmp al,ODH 
jne func_OCH 
print_char 10 
display_char 10 
print_char 13 
display_char 13 

jmp func_OCH 


‘THIS FUNCTION 
‘see Function 05H 

‘is ita CR? 

‘no, print it 

‘see Function 05H 
‘see Function 02H 
‘see Function 05H 
‘see Function 02H 
;get another character 


ODH 
Disk Reset 


Call 


Return 


Remarks 


Macro 


Example 


AH = 0DH 


None 


Function ODH is used to ensure that the internal 
buffer cache matches the disks in the drives. If 
buffers have been modified, but not yet written 
to disk, this function writes them out and marks 
all buffers in the internal cache as free. 


Function 0DH flushes (frees) all file buffers. It 
does not update directory entries; you must close 
files that have changed to update their directory 
entries (see Function 10H, Close File). This func- 
tion need not be called before a disk change if all 
files that changed were closed. It is generally 
used to force a known state of the system; 
CTRL C interrupt handlers should call this 
function. 


disk_reset macro disk 
mov ah,ODH 
int 21H 


endm 


mov ah,ODH 
int 21H 


‘There are no errors returned by this call. 
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OEKH 
Select Disk 


Call AH = 0EH 
DL 
Drive number 
(0 = A:, 1 = B;, etc.) 


Return AL 
Number of logical drives 


Remarks The drive specified in DL (0 = A:, 1 = B;, etc.) is 
selected as the default disk. The number of 
drives is returned in AL. 


Macro select_disk macro disk 
mov dl,disk[-65] ;ASCII offset 
mov ah,OEH 
int 21H 
endm 
Example The following program fragment selects the 
drive not currently selected in a 2-drive system: 
func_OEH: current_disk ‘see Function 19H 
cmp. al,OOH ‘drive A: selected? 
je select_b  ;yes, select B 


select_disk “A” ;THIS FUNCTION 
jmp continue 


select_b: select_disk “B’’ ;THIS FUNCTION 


continue: 
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OFH 
Open File 


Call 


Return 


Remarks 


AH = 0FH 
DS:DX 
Unopened FCB 


AL 
0 = Directory entry found 
FFH = No directory ent: found 


DX must contain the offset (from the segment 
address in DS) of an unopened File Control 
Block (FCB). The disk directory is searched for 
the named file. 


If a directory entry for the file is found, AL 
returns 0 and the FCB is filled as follows: 


If the drive code was 0 (default disk), it is 
changed to the actual disk used (1 = A:, 2 = B;, 
etc.). This lets you change the default disk with- 
out interfering with subsequent operations on 
this file. 


The Current Block field (offset OCH) is set to 
zero. 


The Record Size (offset OEH) is set to the system 
default of 128. 


The File Size (offset 10H), Date of Last Write 
(offset 14H), and Time of Last Write (offset 16H) 
are set from the directory entry. 


Before performing a sequential disk operation 
on the file, you must set the Current Record field 
(offset 20H). Before performing a random disk 
operation on the file, you must set the Relative 
Record field (offset 21H). If the default record 
size (128 bytes) is not correct, set it to the correct 


length. 
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OFH 
Open File 


If a directory entry for the file is not found, AL 


returns FFH. 
Macro open macro fcb 
mov dx,offset fcb 
mov ah,OFH 
int 218 
endm 
Example 


The following program prints the file named 


TEXTFILE. ASC that is on the disk in drive B:. 
If a partial record is in the buffer at end-of-file, 
the routine that prints the partial record prints 
characters until it encounters an end-of-file mark 
(ASCII 26, or CTRL Z): 


tcb 


buffer 


func_OFH: 


read_line: 


printit 


check_more: 
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db 2, ‘TEXTFILEASC” 


db 25 dup (?) 
db 128 dup (?) 


set_dta buffer 


open fcb 

read_seq fcb 

cmp. al,OlH 

je all_done 
cmp al,OOH 

ig check_more 
mov cx,128 

xor S1,Si 


print_char buffer[si] 
inc Sl 


loop print_it 
jmp read_line 
cmp. al,03H 
jne all_done 


‘see Function 1AH 
‘THIS FUNCTION 
‘see Function 14H 
‘end of file? 

:yes, go home 

‘more to come? 

‘no, check for partial 
‘record 

‘yes, print the buffer 
;set index to O 

‘see Function 05H 
‘bump index 

‘print next character 
‘read another record 
‘part. record to print? 
“no 


OFH 


Open File 
mov cx,128 -yes, print it 
XOr si,si ;set index to O 
find_eot: cmp buffer[si],26 ;end-of-file mark? 
je all_done ‘yes 
print_char buffer[si] ;see Function 05H 
inc si ‘bump index to next 
‘character 
loop find_eof 
all_done: close fcb ‘see Function 10H 
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10H 


Close File 
Call AH = 10H 
DS:DX 
Opened FCB 
Return AL 
0 = Directory entry found 
FFH = No directory entry found 
Remarks DX must contain the offset (to the segment 
address in DS) of an opened FCB. The disk 
directory is searched for the file named in the 
FCB. This function must be called after a file is 
changed to update the directory entry. 
If a directory entry for the file is found, the entry 
is compared with the corresponding entries in 
the FCB. The directory entry is updated, if 
necessary, to match the FCB, and AL returns 0. 
If a directory entry for the file is not found, AL 
returns FFH. 
Macro close macro fcb 
mov dx,offset fcb 
mov ah,l1OH 
int Zi 
endm 
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10H 


Close File 
Example The following program checks the first byte of 
the file named MOD1.BAS in drive B: to see if it 
is FFH, and prints a message if it is: 
message db “Not saved in ASCII format’’,13,10,"$" 
fcb db 2,“MOD1 BAS’ 
db 25 dup (?) 
buffer db 128 dup (?) 
func_lOH:  set_dta buffer ‘see Function 1AH 
open tcb ‘see Function OFH 
read_seq fcb ‘see Function 14H 
cmp buffer,OFFH jis first byte FFH? 
jne all_done ‘no 
display message ‘see Function O9H 
all_done close fcb ‘THIS FUNCTION 
rr, 
lain 


11H 


Search for First Entry 


Call 


Return 


Remarks 


Note 
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AH =11H ig 
DS:DX 
Unopened FCB 


AL 
0 = Directory entry found 
FFH = No directory entry found 


DX must contain the offset (from the segment 

address in DS) of an unopened FCB. The disk 

directory is searched for the first matching 

name. The name can have the ? wild card char- 

acter to match any character. To search for hid- 

den or system files, DX must point to the first og 
byte of the extended FCB prefix. 


If a directory entry for the filename in the FCB 
is found, AL returns 0 and an unopened FCB of 
the same type (normal or extended) is created at 
the Disk Transfer Address. 


If a directory entry for the filename in the FCB 
is not found, AL returns FFH. 


If an extended FCB is used, the following search 
pattern is used: 


If the FCB attribute is zero, only normal file 

entries are found. Entries for volume label, sub- Lg 
directories, hidden, and system files will not be 

returned. 


11H 
Search for First Entry 


e Ifthe attribute field is set for hidden or system 
files, or directory entries, it is to be considered as 
an inclusive search. All normal file entries plus 
all entries matching the specified attributes are 
returned. To look at all directory entries except 
the volume label, the attribute byte may be set to 
hidden + system + directory (all 3 bits on). 


e If the attribute field is set for the volume label, it 
is considered an exclusive search, and only the 
volume label entry is returned. 


Macro search_first macro fcb 
mov dx,offset fcb 
mov ah,1l1lH 
int ZL 
endm 
Example The following program verifies the existence of a 
file named REPORT. ASM on the disk in drive 
B:: 
yes db “FILE EXISTS.$” 
no db “FILE DOES NOT EXIST.$” 
fcb db 2,“REPORT ASM” 
db 25 dup (?) 
buffer db 128 dup (?) 
crlf db 13,10 “S" 
func_l1H:  set_dta buffer ‘see Function 1AH 
search_firstficb ;THIS FUNCTION 
cmp al,OFFH © ;directory entry found? 
je not_there ;no 
display yes ‘see Function 09H 
jmp continue 
not_there: display no ‘see Function 09H 
continue: ‘see Function 09H 


display crlf 
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12H 


Search for Next Entry 


Call 


Return 


Remarks 


Macro 
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AH = 12H 
DS:DX 
Unopened FCB 


AL 
0 = Directory entry found 
FFH = No directory entry found 


DX must contain the offset (from the segment 
address in DS) of an FCB previously specified in 
a call to Function 11H (Search for First Entry). 
Function 12H is used after Function 11H to find 
additional directory entries that match a file- 
name that contains wild card characters. The 
disk directory is searched for the next matching 
name. 


If a directory entry for the filename in the FCB 
is found, AL returns 0 and an unopened FCB of 
the same type (normal or extended) is created at 
the Disk Transfer Address. 


If a directory entry for the filename in the FCB 
is not found, AL returns FFH. 


search_next macro fcb 
mov dx,offset fcb 
mov ah,12H 
int Zi 
endm 


12H 
Search for Next Entry 


a 


Example 


message 
tiles 
ten 


fcb 


buffer 


func_12H: 


: \ search_dir: 


done: 
all_done: 


The following program displays the number of 
files on the disk in drive B: 


db “No files’,10,13,"$" 
db O 

db 10 

db 25dup (?) 

as i126 dup (?) 


set_dta buffer ‘see Function 1AH 


search_first fcb ‘see Function 11H 

cmp al,OFFH - ;directory entry found? 

je all_done ‘no, no files on disk 

inc files ;yes, increment file 
;counter 

search_next fcb ‘THIS FUNCTION 

cmp al,OFFH ‘directory entry found? 

je done ‘no 

inc files ‘yes, increment file 
;counter 

jmp search_dir ‘check again 

convert files,ten,message ;see end of chapter 

display message ‘see Function 09H 


13H 


Delete File 


Call 


Return 


Remarks 


Macro 


AH = 13H 
DS:DX 
Unopened FCB 


AL 
0 = Directory entry found 
FFH = No directory entry found 


DX must contain the offset (from the segment 
address in DS) of an unopened FCB. The direc- 
tory is searched for a matching filename. The 
filename in the FCB can contain the ? wild card 
character to match any character. 


If a matching directory entry is found, it is 
deleted from the directory. If the ? wild card 
character is used in the filename, all matching 
directory entries are deleted. AL returns 0. 


If no matching directory entry is found, AL 
returns FFH. 


delete macro fcb 
mov dx,offset fcb 
mov ah,13H 
int Zin 


endm 


13H 
Delete File 


Fy 


Example 


year 
month 
day 

files 

ten 
message 


fcb 


buffer 


func_13H: 


compare: 


next: 


The following deletes each file on the disk in 
drive B: that was last written before June 30, 


1984: 
dw 1984 
db 6 
db 30 
db O 
db 10 


db “NO FILES DELETED.”,13,10,"$" 


db 25 dup(?) 
db 128 dup (?) 


set_dta buffer 
search _first fcb 
cmp al,OFFH 


je all_done 


convert_date buffer 


cmp cx,year 
Ke} next 
cmp dl,month 
Ke} next 
cmp dh,day 


jge next 
delete buffer 
inc files 


search_next fcb 


cmp. al,OOH 
je compare 
cmp files,O 

je all_done 


‘see Function O9H for 
‘explanation of $ 


‘see Function 1AH 
‘see Function 11H 
‘directory entry found? 
‘no, no files on disk 


‘see end of chapter 
;next several lines 
‘check date in directory 
‘entry against date 
‘above & check next file 
‘if date in directory 
‘entry isn't earlier. 
‘THIS FUNCTION 
‘bump deleted-files 
;counter 

‘see Function 12H 
‘directory entry found? 
syes, check date 

‘any files deleted? 

‘no, display NO FILES 
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13H 
Delete File 


RS SE RS a NUR Se PR TREN 


‘message. a 


convert files,ten,message ‘see end of chapter 
all_done: display message ‘see Function 09H 


7-58 


14H 
Sequential Read 


Call 


Return 


Remarks 


AH = 14H 

DS:DX 
Opened FCB 

AL 
0 = Read completed successfully 
1 = EOF 


2 = DTA too small 
3 = EOF, partial record 


DX must contain the offset (from the segment 
address in DS) of an opened FCB. The record 
pointed to by the current block (offset OCH) and 
Current Record (offset 20H) fields is loaded at 
the Disk Transfer Address, then the Current 
Record and, if necessary, the Current Block 
fields are incremented. 


The record size is set to the value at offset OHH 
in the FCB. 


AL returns a code that describes the processing: 


Code Meaning 
0 Read completed successfully. 
1 End-of-file, no data in the record. 


2 Not enough room at the Disk 
Transfer Address to read one 
record; read canceled. 


3 End-of-file; a partial record was 
read and padded to the record 
length with zeros. 
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14H 


Sequential Read 


Macro 


Example 


fcb 


buffer 


func_14H: 


read_line: 


check_more: 


find_eotf: 
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read_seq macro fcb 
mov.  dx,offset fcb 
mov ah,14H 
int Zi 


endm 


The following program displays the file named 
TEXTFILE.ASC that is on the disk in drive B;; 
its function is similar to the MS-DOS TYPE 
command. If a partial record is in the buffer at 
end of file, the routine that displays the partial 
record displays characters until it encounters an 
end-of-file mark (ASCII 26, or CTRL Z ): 


db 2,“TEXTFILEASC’” 
db 25 dup (?) 
db 128 dup (?),"$" 


set_dta buffer ‘see Function 1AH 

open fcb ‘see Function OFH 
read_seq fcb ‘THIS FUNCTION 

cmp al,OlH ‘end-of-file? 

je all_done ‘yes 

cmp al,OOH ‘more to come? 

ig check_more ;no, check for partial record 
display buffer ‘see Function O9H 

jmp read_line ‘get another record 

cmp al,03H ;partial record in buffer? 
jne all_done ‘no, go home 

xOr si,si ‘set index to O 

cmp buffer[si],26 ‘is character EOF? 

je all_done ‘yes, no more to display 
display_char buffer[si] ;see Function 02H 

inc si ‘bump index to next 


Y 


14H 


Sequential Read 
;character 
jmp __—find_eof ;check next character 
all_done: close fcb ;see Function 10H 


7-61 


15H 


Sequential Write 


LEELA LEE LLL LALO EL ELE PEEL NEEL ELE LENE ELSES LEE LE LLLLE DELL LAL LIAS ELE, 


Call 


Return 


Remarks 


AH = 15H 
DS:DX 
Opened FCB 


AL 
OOH = Write completed successfully 
01H = Disk full 
02H = DTA too small 


DX must contain the offset (from the segment 
address in DS) of an opened FCB. The record 
pointed to by Current Block (offset OCH) and 
Current Record (offset 20H) fields is written from 
the Disk Transfer Address, then the fields are 
incremented as necessary. 


The record size is set to the value at offset OHH 
in the FCB. If the Record Size is less than a sec- 
tor, the data at the Disk Transfer Address is 
written to a buffer; the buffer is written to disk 
when it contains a full sector of data, or the file 
is closed, or a Reset Disk system call (Function 
ODH) is issued. 


AL returns a code that describes the processing: 


Code Meaning 
0 transfer completed successfully 
1 disk full; write canceled 
2 write canceled; the area beginning at 


the Disk Transfer Address is too small 
to hold a record of data without over- 
flowing or wrapping around a seg- 
ment boundary. 


15H 
Sequential Write 


Macro 


Example 


write_seq macro fcb 
mov dx,offset fcb 


mov ah,15H 


int Zin 


endm 


The following program creates a file named 
DIR.TMP on the disk in drive B: that contains 
the disk number (0 = A:, 1 = B:, etc.) and file- 
name from each directory entry on the disk: 


record_size equ 14 


tcbl 


fcb2 


buffer 


func_15H: 


write_it: 


all_done: 


;offset of Record Size 
‘field in FCB 


db 2,“DIR TMP” 
db 25 dup (?) 


db 25 dup (?) 
db 128 dup (?) 


set_dta 


buffer ;see Function 1AH 
search_first fcb2 ‘see Function 11H 
cmp alOFFH  ;directory entry found? 
je all_done ;no, no files on disk 
create tcbl ‘see Function 16H 
mov fcbl[record_size],12 

‘set record size to 12 

write_seq tcbl ‘THIS FUNCTION 
search_next fcb2 ‘see Function 12H 
cmp al,OFFH  ;directory entry found? 
je all_done ;no, go home 
jmp write_it ;yes, write the record 
close tcbl ‘see Function 10H 


16H 


Create File 


Call 


Return 


Remarks 
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AH = 16H 
DS:DX 
Unopened FCB 


AL 
OOH = Empty directory entry found 
FFH = No empty entry directory available 


DX must contain the offset (from the segment 
address in DS) of an unopened FCB. The direc- 
tory is searched for an empty entry or an exist- 
ing entry for the specified filename. 


If an empty directory entry is found, it is initial- 
ized to a zero-length file, the Open File system 
call (Function OFH) is called, and AL returns 0. 
You can create a hidden file by using an extend- 
ed FCB with the attribute byte (offset FCB-1) set 
to 2. 


If an entry is found for the specified filename, all 
data in the file is released, making a zero-length 
file, and the Open File system call (Function 
OFH) is issued for the filename (in other words, 
if you try to create a file that already exists, the 
existing file is erased, and a new, empty file is 
created). 


If an empty directory entry is not found and 
there is no entry for the specified filename, AL 
returns FFH. 


wy 


Macro 


Example 


create macro fcb 


16H 
Create File 


mov dx,offset fcb 


mov ah,16H 
int 21h 
endm 


The following program creates a file named 
DIR.TMP on the disk in drive B: that contains 
the disk number (0 = A:, 1 = B:, etc.) and file- 
name from each directory entry on the disk: 


record_size equ 14 


fcbl 


fcb2 


buffer 


func_16H: 


write_it: 


all_done: 


‘offset of Record Size 


‘tield of FCB 


db 2,“DIR TMP” 
ab 25 dup (7) 


db 25 dup (?) 
db 128 dup (?) 


set_dta 
search _first 
cmp 

je 

create 

mov 


write_seq 
search_next 
cmp 

je 

jmp 

close 


buffer ‘see Function 1AH 
fcb2 ‘see Function 11H 
al,OFFH  ;directory entry found? 
all_done ;no, no files on disk 
tcbl sTHIS FUNCTION 
fcbl[record_size],12 

;set record size to 12 
tcbl ‘see Function 15H 
tcb2 ‘see Function 12H 
al,OFFH  ;directory entry found? 
all_done ;no, go home 
write_it ;yes, write the record 
tcbl ‘see Function 10H 
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17H 


Rename File 


Call 


Return 


Remarks 
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AH = 17H 
DS:DX 
Modified FCB 


AL 
OOH = Directory entry found 
FFH = No directory entry found or 
destination already exists 


DX must contain the offset (from the segment 
address in DS) of an FCB with the drive number 
and filename filled in, followed by a second file- 
name at offset 11H. The disk directory is search- 
ed for an entry that matches the first filename, 
which can contain the ? wild card character. 


If a matching directory entry is found, the file- 
name in the directory entry is changed to match 
the second filename in the modified FCB (the 
two filenames cannot be the same name). If the ? 
wild card character is used in the second file- 
name, the corresponding characters in the file- 
name of the directory entry are not changed. AL 
returns 0. 


If a matching directory entry is not found or an 
entry is found for the second filename, AL 
returns FFH. 


17H 
Rename File 


Macro rename macro special_fcb 
mov. dx,offset special_fcb 
mov ah,17H 
int 21H 
endm 


Example The following program prompts for the name of 
a file and a new name, then renames the file: 


fcb db 37 dup (?) 

promptl db “Filename: $” 

prompt2 db “New name: $” 

reply db 17 dup(?) 

erlf ap 12,10,°2" 

func_17H: display promptl ‘see Function 09H 
get_string 15,reply ;see Function OAH 
display crlf ‘see Function 09H 


parse reply[2],fcb ;see Function 29H 
display prompt2  ;see Function 09H 
get_string 15,reply ;see Function OAH 
display crilf ‘see Function 09H 
parse reply[2],fcb[16] 

‘see Function 29H 
rename  fcb ‘THIS FUNCTION 
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19H 


Current Disk 
Call AH = 19H 
Return Al, 


Macro 


Example 


7-68 


Currently selected drive 
(0 = A:, 1 = B,, etc.) 


current_disk macro 
mov ah,19H 
int 21H 
endm 


The following program displays the currently 
selected (default) drive: 


message db “Current disk is $” ;see Function 09H 


‘for explanation of $ 


erlf db 13,10,“$’ 

func_19H: display message ‘see Function 09H 
current_disk ‘THIS FUNCTION 
add al,41H ‘ASCII offset 
display_char al ‘see function 02H 
display crlf ‘see function O9H 


w 


1AH 
Set Disk Transfer Address 


Call 


Return 


Remarks 


Note: 


Macro 


DS:DX 
Disk Transfer Address 


None 


DX must contain the offset (from the segment 
address in DS) of the Disk Transfer Address. 
Disk transfers cannot wrap around from the end 
of the segment to the beginning, nor can they 
overflow into another segment. 


If you do not set the Disk Transfer Address, 
MS-DOS defaults to offset 80H in the Program 
Segment Prefix. 


The size of the buffer that the DTA points to 
must be greater than or equal to the record size 
at open file time. 


set_dta macro buffer 
mov dx,offset buffer 
mov ah,lAH 
int Z2iH 
endm 


1AH 


Set Disk Transfer Address 


Example 


record _size 


The following program prompts for a letter, con- 
verts the letter to its alphabetic sequence (A = 1, 
B = 2, etc.), then reads and displays the corre- 
sponding record from a file named ALPHABET-.- 
DAT on the disk in drive B:. The file contains 26 
records; each record is 28 bytes long: 


equ 14 -offset of Record Size 
itield of FCB 


relative_record equ 33 ;offset of Relative Record 
‘tield of FCB 

tcb db 2,“ALPHABETDAT” 
db 25 dup (?) 

buffer db 34 dup(?),"$" 

prompt db “Enter letter: $” 

crlf db 13,10,"$’ 

func_1AH: set_dta buffer ‘THIS FUNCTION 
open fcb ‘see Function OFH 
mov__ fcb[record_size],28 ;set record size 

get_char: display prompt ‘see Function 09H 
read_kbd_and_echo ‘see Function 01H 
cmp al,ODH ;just a CR? 
je all_done ;yes, go home 
sub al.41H ‘convert ASCII 

‘code to record # 
mov ___ fcb[relative_record],al 
;set relative record 

display crlf ‘see Function 09H 
read_ran fcb ‘see Function 21H 
display buffer ‘see Function 09H 
display crlf ‘see Function 09H 
jmp get_char ‘get another character 

all_done: close fcb ‘see Function 10H 


Ld 


wo 


Call 


Return 


Remarks 


Macro 


21H 
Random Read 


AH = 21H 
DS:DX 
Opened FCB 


AL 
OOH = Read completed successfully 
01H = EOF 
02H = DTA too small 
03H = EOF, partial record 


DX must contain the offset (from the segment 
address in DS) of an opened FCB. The Current 
Block (offset OCH) and Current Record (offset 
20H) fields are set to agree with the Relative 
Record field (offset 21H), then the record 
addressed by these fields is loaded at the Disk 
Transfer Address. 


AL returns a code that describes the processing: 
Code Meaning 


0 read completed successfully 
1 End-of-file; no data in the record 


2 not enough room at the Disk Transfer 
Address to read one record; read can- 
celed 


3 End-of-file; a partial record was read 
and padded to the record length with 
Zeros. 


read_ran macro fcb 
mov  dx,offset fcb 
mov ah,21H 
int 21H 
endm 
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ZiH 
Random Read 


Example The following program prompts for a letter, con- 
verts the letter to its alphabetic sequence (A = 1, 
B = 2, etc.), then reads and displays the corre- 
sponding record from a file named ALPHABET-.- 
DAT on the disk in drive B:. The file contains 26 
records; each record is 28 bytes long: 


record_size equ 14 ;offset of Record Size 
‘tield of FCB 
relative_record equ 33 ;offset of Relative Record 
:‘tield of FCB 
fcb db 2,“ALPHABETDAT"” 
db 25 dup (?) 
buffer db 34 dup(?),"$”’ 
prompt db “Enter letter: $”’ 
crlf ab 13,10,"$" 
func._21H: set_dta buffer ‘see Function 1AH 
open fcb ‘see Function OFH 
mov fcb[record_size],28 ;set record size 
get_char: display prompt ‘see Function O9H 
read_kbd_and_echo ‘see Function 01H 
cmp al,ODH sjust a CR? 
je all_done ;yes, go home 
sub al,41H ‘convert ASCII 


-code to record # 
mov ___ fcb[relative_record],al 
‘set relative record 


display crlf ‘see Function 09H 
read_ran fcb ‘THIS FUNCTION 
display buffer ‘see Function 09H 
display crlf ;see Function 09H 
jmp get_char ;get another character 
all_done: close fcb ‘see Function 10H 
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22H 
Random Write 


Call 


Return 


Remarks 


Macro 


AH = 22H 
DS:DX 
Opened FCB 


AL 
OOH = Write completed successfully 
01H = Disk full 
02H = DTA too small 


DX must contain the offset from the segment 
address in DS of an opened FCB. The Current 
Block (offset OCH) and Current Record (offset 
20H) fields are set to agree with the Relative 
Record field (offset 21H), then the record 
addressed by these fields is written from the 
Disk Transfer Address. If the record size is 
smaller than a sector (512 bytes), the records are 
buffered until a sector is ready to write. 


AL returns a code that describes the processing: 


Code Meaning 
0 Write completed successfully 
i disk is full 
2 write canceled; the area beginning at 


the Disk Transfer Area is too small to 
hold a record of data without over- 
flowing or wrapping around a seg- 
ment boundary. 


write_ran macro fcb 
mov dx,offset fcb 


mov ah,22H 
int 21H 
endm 
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22H 
Random Write 


Example The following program prompts for a letter, con- 
verts the letter to its alphabetic sequence (A = 1, 
B = 2, etc.), then reads and displays the corre- 
sponding record from a file named ALPHABET.- 
DAT on the disk in drive B:. After displaying the 
record, it prompts the user to enter a changed 
record. If the user types a new record, it is writ- 
ten to the file; if the user just presses CR, the 
record is not replaced. The file contains 26 
records; each record is 28 bytes long: 


record_size equ 14 ‘offset of Record Size 
‘field of FCB 
relative_record equ 33 ‘offset of Relative Record 
‘field of FCB 

fcb db 2,“ALPHABETDAT"” 
db 25 dup (?) 

buffer db 28 dup(?),13,10,“$" 

promptl db “Enter letter: $’ 

prompt2 db ‘New record(CR for no change): $” 

crlf db. 13,.10."9" 

reply db 30 dup (32) 

blanks ab 28 dup (32) 

tuncC..22H: set_dta buffer ‘see Function 1AH 
open fcb ‘see Function OFH 
mov _ fcb[record_size],28 ;set record size 

get_char: display promptl ‘see Function 09H 
read_kbd_and_echo ‘see Function 01H 
cmp al,ODH ‘just a CR? 
je all_done ‘yes, go home 
sub al.41H ‘convert ASCII 


‘code to record # 
mov ._ fcb[relative_record],al 
‘set relative record 
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all_done: 


22H 
Random Write 


display crlf ;see Function 09H 
read_ran fcb ‘THIS FUNCTION 
display buffer ‘see Function 09H 
display crlf ;see Function 09H 
display prompt2 ‘see Function 09H 
get_string 29, reply ‘see Function O9H 
display crlf ;see Function 09H 
cmp reply[1],O ;was anything typed 
‘besides cr? 
je get_char ;no 
;get another character 
xor bx, bx ‘to load a byte 
mov__ib 1, reply[1] ‘use reply length as 
;counter 


move_string blanks, buffer, 28 

‘see chapter end 
move_string reply[2], buffer, bx 

;see chapter end 


write_ran fcb ‘THIS FUNCTION 
jmp get_char ‘get another character 
close fcb ‘see Function 10H 
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23H 
File Size 


Call AH = 23H 
DS:DX 
Unopened FCB 
Return AL 


OOH = Directory entry found 
FFH = No directory entry found 


Remarks DX must contain the offset (from the segment 
address in DS) of an unopened FCB. You must 
set the Record Size field (offset OEH) to the 
proper value before calling this function. The 
disk directory is searched for the first matching 
entry. 


If a matching directory entry is found, the Rela- 
tive Record field (offset 21H) is set to the number 
of records in the file, calculated from the total 
file size in the directory entry (offset 10H) and 
the Record Size field of the FCB (offset OEH). AL 
returns 00. 


If no matching directory entry is found, AL 
returns FFH. 


Note If the value of the Record Size field of the FCB 
(offset O0EH) doesn’t match the actual number of 
characters in a record, this function may not 
return the correct file size. If the default record 
size (128) is not correct, you must set the Record 
Size field to the correct value before using this 
function. 
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23H 
File Size 


Macro 


Example 


tcb 
prompt 
msgl 
msg2 
erlf 
reply 
sixteen 


func_23H: 


get_length: 


convert_it: 


file_size macro fcb 
mov  dx,offset fcb 
mov ah,23H 
int 21H 
endm 


The following program prompts for the name of 
a file, opens the file to set the Record Size field of 
the FCB to 80H, issues a File Size system call, 
and displays the file size and number of records 
in hexadecimal: 


db 37 dup(?) 

db “File name: $” 

db “Record length: ",13,10,“$” 

db “Records: “’,13,10,"$" 

db 13,10,"3" 

db 17 dup(?) 

db 16 

display prompt ‘see Function 09H 

get_string 17,reply ‘see Function OAH 

cmp reply[1],O ‘just a CR? 

jne get_length  =;no, keep going 

jmp all_done ‘yes, go home 

display crlf ‘see Function 09H 

parse reply[2],fcb ;see Function 29H 

open fcb ‘see Function OFH 

file_size fcb ‘THIS FUNCTION 

mov si,33 ‘offset to Relative 
‘Record field 

mov di,9 ‘reply in msg2 

cmp fcb[si],O ;digit to convert? 

je show_it ‘no, prepare message 
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23H 


File Size 
convert fcb[si],sixteen,msg2[di] 
inc si ‘bump n-o-r index 
inc di ‘bump message index 
jmp convert_it  ;check fora digit 
show_it: convert fcb[14],sixteen,msg1[15] 
display msgl ‘see Function 09H 
display msg2 ‘see Function 09H 
jmp func23H ‘get a filename 
all_done: close fcb ‘see Function 10H 
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24H 
Set Relative Record 


Call 


Return 


Remarks 


Macro 


Example 


AH = 24H 
DS:DX 
Opened FCB 


None 


DX must contain the offset (from the segment 
address in DS) of an opened FCB. The Relative 
Record field (offset 21H) is set to the same file 
address as the Current Block (offset OCH) and 
Current Record (offset 20H) fields. 


set_relative_record macro fcb 
mov dx,offset fcb 
mov ah,24H 
int Zi 
endm 


The following program copies a file using the 
Random Block Read and Random Block Write 
system calls. It speeds the copy by setting the 
record length equal to the file size and the record 
count to 1, and using a buffer of 32K bytes. It 
positions the file pointer by setting the Current 
Record field (offset 20H) to 0 and using Set Rela- 
tive Record to make the Relative Record field 
(offset 21H) point to the same record as the com- 
bination of the Current Block (offset OCH) and 
Current Record (offset 20H) fields: 


24H 


Set Relative Record 

current_record equ 32 ‘offset of Current Record 
‘field of FCB 

fsize equ 16 ‘offset of File Size 


tcb 
filename 
promptl 
prompt2 
erlf 


tile_length 
bufter 


func_24H: 
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ifield of FCB 


ab 3/7 dup (7) 
db 17 dup(?) 


db “File to copy: $” ‘see Function O9H for 
db “Name ofcopy: $’ ‘explanation of $ 

db 13,10,"$" 

dw ? 


db 32767 dup(?) 


set_dta butter ‘see Function 1AH 
display promptl ‘see Function O9H 
get_string 15,filename ‘see Function OAH 
display crlf ‘see Function O9H 
parse filename[2],fcb ‘see Function 29H 
open tcb ‘see Function OFH 
mov fcb[current_record],O ‘set Current Record 
‘field 
set_relative_record fcb ‘THIS FUNCTION 
mov ax,word ptr fcb[fsize] ‘get file size 
mov file_length,ax ‘save it for 
‘ran_block_write 
ran_block_read fcb,1,ax ‘see Function 27H 
display prompt2 ‘see Function O9H 
get_string 15,filename ‘see Function OAH 
display crlf ‘see Function O9H 
parse filename[2],fcb ‘see Function 29H 
set_relative_record fcb ‘THIS FUNCTION 


24H 
Set Relative Record 


mov ax,file_length -get original file 
‘length 

ran_block_write fcb,l,ax ‘see Function 28H 

close fcb ‘see Function 10H 


25H 
Set Vector 


Call AH = 25H 
AL 
Interrupt number 
DS:DX 
Interrupt-handling routine 


Return None 


Remarks Function 25H should be used to set a particular 
interrupt vector. The operating system can then 
manage the interrupts on a per-process basis. 
Note that programs should never set interrupt 
vectors by writing them directly in the low 
memory vector table. 


DX must contain the offset (to the segment 
address in DS) of an interrupt-handling routine. 
AL must contain the number of the interrupt 
handled by the routine. The address in the vec- 
tor table for the specified interrupt is set to 
DS:DX. 


Macro set_vector macro interrupt, seg_addr,off_addr 
push ds 
mov  ax,seg_addr 
mov ds,ax 
mov  dx,off_addr 
mov _._ al, interrupt 
mov  ah,25H 
int Zin 
pop. ds 
endm 


Example lds dx,intvector 
mov ah,25H 
mov. al,intnumber 
int 21H 
‘There are no errors returned 
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27H 
Random Block Read 


Call 


Return 


Remarks 


AH = 27H 
DS:DX 
Opened FCB 
CX 
Number of blocks to read 


AL 
OOH = Read completed successfully 
01H = EOF 
02H = End of segment 
03H = EOF, partial record 
CX 
Number of blocks read 


DX must contain the offset (to the segment 
address in DS) of an opened FCB. CX must con- 
tain the number of records to read; if it contains 
0, the function returns without reading any 
records (no operation). The specified number of 
records, calculated from the Record Size field 
(offset OEH), is read starting at the record speci- 
fied by the Relative Record field (offset 21H). 
The records are placed at the Disk Transfer 
Address. 


AL returns a code that describes the processing: 


Code Meaning 
0 Read completed successfully 
1 Eind-of-file; no data in the record 


2 not enough room at the Disk Transfer 
Address to read one record without 
overflowing a segment boundary; read 
cancelled 


3 End-of-file; a partial record was read 
and padded to the record length with 
Zeros 
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27H 


Random Block Read 
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CX returns the number of records read; the Cur- 
rent Block (offset OCH), Current Record (offset 
20H), and Relative Record (offset 21H) fields are 
set to address the next record. 


Macro ran_block_read macro fcb,count,rec_size 
mov dx,offset fcb 
mov cx,count 
mov word ptr fcb[14],rec_size 
mov ah,27H 
int 21H 
endm 
Example The following program copies a file using the 
Random Block Read system call. It speeds the 
copy by specifying a record count of 1 anda 
record length equal to the file size, and using a 
buffer of 32K bytes; the file is read as a single 
record (compare to the sample program for 
Function 28H that specifies a record length of 1 
and a record count equal to the file size): 
current_record equ 32 ;offset of Current Record 
‘tield 
fsize equ 16 ‘offset of File Size 
‘tield 
fcb db 37 dup (?) 
filename db 17 dup(?) 
promptl db “File to copy: $” ‘see Function O9H for 
prompt2 db “Nameofcopy: $’ ;explanation of $ 
erlf db 13,10,“$’ 


file_length 
buffer 


func_27H: 
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dw ? 
db 32767 dup(?) 


set_dta buffer ‘see Function 1AH 


display promptl 
get_string 15,filename 
display crlf 

parse filename[2],fcb 
open _ fcb 

mov fcb[current_record],O 


set_relative_record fcb 
mov ax,word ptr fcb[fsize] 
mov file_length,ax 


ran_block_read fcb,1l,ax 
display prompt2 
get_string 15,filename 
display crlf 

parse filename[2],icb 
create fcb 

mov fcb[current_record],O 


set_relative_record fcb 
mov ax,file_length 


ran_block_write fcb,l,ax 
close’ fcb 


27H 
Random Block Read 


‘see Function 09H 
‘see Function OAH 
‘see Function O9H 
‘see Function 29H 
‘see Function OFH 
‘set Current Record 
‘field 

‘see Function 24H 
‘get file size 

‘save it for 
‘ran_block_write 
‘THIS FUNCTION 
‘see Function 09H 
‘see Function OAH 
‘see Function 09H 
‘see Function 29H 
‘see Function 16H 
‘set Current Record 
‘tield 

‘see Function 24H 
‘get original file 
‘size 

‘see Function 28H 
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28H 


Random Block Write 
Call AH = 28H 
DS:DX 
Opened FCB 
CX 


Return 


Remarks 
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Number of blocks to write 
(0 = set File Size field) 


AL 
OOH = Write completed successfully 
01H = Disk full 
02H = End of segment 

CX 


Number of blocks written 


DX must contain the offset (to the segment 
address in DS) of an opened FCB; CX must con- 
tain either the number of records to write or 0. 
The specified number of records (calculated from 
the Record Size field, offset OK H) is written from 
the Disk Transfer Address. The records are writ- 
ten to the file starting at the record specified in 
the Relative Record field (offset 21H) of the FCB. 
If CX is 0, no records are written, but the File 
Size field of the directory entry (offset 10H) is set 
to the number of records specified by the Rela- 
tive Record field of the FCB (offset 21H); alloca- 
tion units are allocated or released, as required. 


AL returns a code that describes the processing: 
Code Meaning 


0 Write completed successfully 
i Disk full. No records written. 


2 Not enough room at the Disk Transfer 
Address to write one record without 
overflowing a segment boundary; 
write canceled. 


28H 
Random Block Write 


Macro 


Example 


CX returns the number of records written; the 
current block (offset OCH), Current Record 
(offset 20H), and Relative Record (offset 21H) 
fields are set to address the next record. 


ran_block_write macro fcb,count,rec_size 
mov. dx,offset fcb 
mov cx,count 
mov word ptr fcb[14],rec_size 
mov ah,28H 
int Z2LH 


endm 


The following program copies a file using the 
Random Block Read and Random Block Write 
system calls. It copies by specifying a record 
count equal to the file size and a record length of 
1, and using a buffer of 32K bytes; the file is 
copied with one disk access each to read and 
write (compare to the sample program of Func- 
tion 27H, that specifies a record count of 1 anda 
record length equal to file size): 


current_record equ 32 ‘offset of Current Record 


tsize 


fcb 
filename 
promptl 
prompt2 
crlf 


num _— recs 


buffer 


‘tield 
equ 16 ‘offset of File Size 
‘tield 


db 37 dup (?) 

db 17 dup(?) 

db ‘File to copy: $” ‘see Function O9H for 
db “Name ofcopy: $” ;explanation of $ 


db 13,10,°S" 


dw ? 
ab 32/67 dup(?) 


28H 
Random Block Write 
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func_28H: set_dta buffer ‘see Function 1AH 
display promptl ‘see Function 09H 
get_string 15,filename ‘see Function OAH 
display — crif ‘see Function 09H 
parse filename[2],fcb ‘see Function 29H 
open tcb ‘see Function OFH 
mov fcb[current_record],O ;set Current Record 

‘tield 

set_relative_record fcb ‘see Function 24H 
mov ax,word ptr fcb[fsize] ;get file size 
mov num _recs, ax ‘save it for 


‘ran_block_write 
ran_block_read fcb,num_recs,1;see Function 27H 


display prompt2 ‘see Function 09H 
get_string 15,filename ‘see Function OAH 
display —_crif ‘see Function 09H 
parse filename[2],fcb ‘see Function 29H 
create fcb ‘see Function 16H 
mov fcb[current_record],0 ;set Current Record 
‘field 
set_relative_record fcb ‘see Function 24H 
ran_block_write fcb,num _recs,1;THIS FUNCTION 
close fcb ‘see Function 10H 
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29H 
Parse File Name 


Call 


Return 


Remarks 


Controls parsing (see text) 
DS:SI 

String to parse 
ES:DI 

Unopened FCB 


AL 
OOH = No wild card characters 
01H = Wild-card characters used 
FFH = Drive letter invalid 
DS:SI 
First byte past string that was parsed 
ES:DI 
Unopened FCB 


SI must contain the offset (to the segment ad- 
dress in DS) of a string (command line) to parse; 
DI must contain the offset (to the segment ad- 
dress in ES) of an unopened FCB. The string is 
parsed for a filename of the form d:filename.ext; 
if one is found, a corresponding unopened FCB 
is created at ES:DI. 


Bits 0-3 of AL control the parsing and process- 
ing. Bits 4-7 are ignored: 


29H 
Parse File Name 


Bit Value Meaning 
0 0 All parsing stops if a file separator 
is encountered. 
1 Leading separators are ignored. 
1 0 The drive number in the FCB is set 


to 0 (default drive) if the string does 
not contain a drive number. 


1 The drive number in the FCB is not 
changed if the string does not con- 
tain a drive number. 


2 0 The filename in the FCB is set to 8 
blanks if the string does not contain 
a filename. 


1 The filename in the FCB is not 
changed if the string does not con- 
tain a filename. 


3 0 The extension in the FCB is set to 3 
blanks if the string does not contain 
an extension. 


1 The extension in the FCB is not 
changed if the string does not con- 
tain an extension. 


If the filename or extension includes an asterisk 
(*), all remaining characters in the name or 
extension are set to question mark (?). 


29H 
Parse File Name 


Filename separators: 


-.5,=+/“[]\<>| space tab 


Filename terminators include all the filename 
separators plus any control character. A file- 
name cannot contain a filename terminator; if 
one is encountered, parsing stops. 


If the string contains a valid filename: 


AL returns 1 if the filename or extension con- 
tains a wild card character (* or ?); AL returns 0 
if neither the filename nor extension contains a 
wild card character. 


DS:SI point to the first character following the 
string that was parsed. 


ES:DI point to the first byte of the unopened 
FCB. 


If the drive letter is invalid, AL returns FFH. If 


the string does not contain a valid filename, 
ES:DI+1 points to a blank (ASCII 20H). 
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29H 


Parse File Name 
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Macro 


Example 


tcb 
prompt 
reply 
yes 

no 

erlf 


func_29H: 


not_there: 
continue: 


parse macro string, fcb 
mov si, offset string 
mov. di, offset fcb 


push es 

push ds 

pop. es 

mov al,OFH ;bitsO, 1,2, 3o0n 
mov ah,29H 

int 21H 

pop. es 

endm 


The following program verifies the existence of 
the file named in reply to the prompt: 


db 37 dup (?) 

db ‘Filename: $” 

db 17 dup (?) 

db “FILE EXISTS”, 13,10,“$" 

db “FILE DOES NOT EXIST”, 13,10,"$" 
ap 13,14,°S" 


display prompt ‘see Function 09H 


get_string 15,reply ‘see Function OAH 
display crlf ‘see Function 09H 
parse reply[2],fcb ‘THIS FUNCTION 
search_first fcb ‘see Function 11H 
cmp al,OFFH ‘dir. entry found? 
je not_there no 

display yes ‘see Function 09H 
jmp continue 

display no 


Call 


Return 


Remarks 


Macro 


Example 


AH = 2AH 
CX 

Year (1980-2099) 
DH 

Month (1-12) 
DL 

Day (1-31) 
AL 


Day of week (0 = Sunday, 6 = Saturday) 


This function returns the current date set in the 
operating system as binary numbers in CX and 
DX: 


CX Year (1980-2099) 

DH Month (1 = January, 2 = February, etc.) 

DL Day (1-31) 

AL Day of week (0 = Sunday, 1 = Monday, 
etc.) 


get_date macro 


mov ah,2AH 
int 21H 
endm 


The following program gets the date, increments 
the day, increments the month or year, if neces- 
sary, and sets the new date: 
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2AH 
Get Date 
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month db 31,28,31,30,31,30,31,31,30,31,30,31 


func_2AH: get_date 


inc dl 

xor bx, bx 

mov bl,dh 

dec bx 

cmp dl,month[bx] 
jle month_ok 
mov dl,1 

inc dh 

cmp dh,12 

jle month_ok 
mov ah, i 

inc cx 


month_ok: set_date cx,dh,dl 
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‘see above 

‘increment day 

‘so BL can be used as index 
‘move month to index register 
‘month table starts with O 
‘past end of month? 

‘no, set the new date 

‘yes, set day to l 

‘and increment month 
-past end of year? 

‘no, set the new date 

-yes, set the month to l 
‘increment year 


;THIS FUNCTION 


Call 


Return 


Remarks 


Macro 


2BH © 
Set Date 


AH = 2BH 
CX 
Year (1980-2099) 
DH 
Month (1-12) 
DL 
Day (1-31) 
AL 


OOH = Date was valid 
FFH = Date was invalid 


Registers CX and DX must contain a valid date 
in binary: 


CX Year (1980-2099) 
DH Month (1 = January, 2 = February, etc.) 
DL Day (1-81) 


If the date is valid, the date is set and AL 
returns 0. If the date is not valid, the function is 
canceled and AL returns FFH. 


set_date macro year,month,day 
Mov cx,year 
mov dh,month 
mov dl,day 
mov ah,2BH 
int Z21 


2BH 
Set Date 


Example The following program gets the date, increments 
the day, increments the month or year, if neces- 
sary, and sets the new date: 


month db 3128 31,20,31,30,31,41,00,51,30 51 
func_2BH: get_date ‘see Function 2AH 
inc dl ‘increment day 
xor bx, bx ‘so BL can be used as index 
Mov bl,dh -move month to index register 
dec bx ‘month table starts with O 
cmp dl,month[bx] ;past end of month? 
jle month_ok __;no, set the new date 
mov dl,1 ‘yes, set day to l 
inc dh ‘and increment month 
cmp dh,12 -past end of year? 
jle month_ok _ ;:no, set the new date 
mov dh, 1 syes, set the month to l 
inc cx ‘increment year 
month_ok: set date cx,dh,dl ‘THIS FUNCTION 
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2CH 
Get Time 


ee cee One ee ee ae ee ee 


y =| 
Call 
Return 
Remarks 
iii 
Macro 
Example 
ym, 


AH = 2CH 
CH 

Hour (0-23) 
CL 

Minutes (0-59) 
DH 

Seconds (0-59) 
DL 

Hundredths (0-99) 


This function returns the current time set in the 
operating system as binary numbers in CX and 
DX: 


CH Hour (0-23) 

CL Minutes (0-59) 

DH Seconds (0-59) 

DL Hundredths of a second (0-99) 


get_time macro 


mov ah,2CH 
int 21H 
endm 


The following program continuously displays 
the time until any key is pressed: 
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2CH 
Get Time 


func..2CH: 


all_done: 
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db "00:00;00.00",13,°S" 
db 10 
get_time ‘THIS FUNCTION 


convert ch,ten,time 
convert cl,ten,time[3] 
convert dh,ten,time[6] 
convert dl,ten,time[9] 
display time 
check_kbd_status 


cmp al,OFFH 
je all_done 
jmp func_2CH 


‘see end of chapter 

‘see end of chapter 

‘see end of chapter 

‘see end of chapter 

‘see Function 09H 

‘see Function OBH 

‘has a key been pressed? 
‘yes, terminate 

sno, display time 


ym, 


2DH 
Set Time 


Call 


Return 


Remarks 


Macro 


AH = 2DH 
CH 

Hour (0-23) 
CL 

Minutes (0-59) 
DH 

Seconds (0-59) 
DL 

Hundredths (0-99) 
AL 


OOH = Time was valid 
FFH (255) = Time was invalid 


Registers CX and DX must contain a valid time 
in binary: 


CH Hour (0-23) 

CL Minutes (0-59) 

DH _ Seconds (0-59) 

DL Hundredths of a second (0-99) 


If the time is valid, the time is set and AL 
returns 0. If the time is not valid, the function is 
canceled and AL returns FFH (255). 


set_time macro hour,minutes,seconds,hundredths 
mov ch,hour 
mov cl,minutes 
mov  dh,seconds 


mov’ dl,hundredths 


mov ah,2DH 
int 21H 
endm 
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2DH 
Set Time 


Example 


time 
ten 


func_2DH: 


read_clock: 


continue: 


7-100 


The following program acts as a stopwatch. 
When a character is typed, it sets the system 
clock to zero and begins to continuously display 
the time. When a second character is typed the 
system stops updating the time display. 


db "00:00:00,.00" ,13,"S" 


db 10 


dir_console_io OFFH 


jz func_2DH 
set_time 0,0,0,0 
get_time 


convert ch,ten,time 

convert cl,ten,time[3] 
convert dh,ten,time[6] 
convert dl,ten,time[9] 
display time 
dir_console_io OFFH 

jz read_clock 


‘see Function 06H 
‘wait for keystroke 
‘THIS FUNCTION 
‘see Function 2CH 
‘see end of chapter 
‘see end of chapter 
‘see end of chapter 
‘see end of chapter 
‘see Function 09H 
‘THIS FUNCTION 
‘no char, keep updating 


Call 


Return 


Remarks 


Macro 


Example 


2EH 
Set/Reset Verify Flag 


AH = 2EH 

AL 
OOH = Do not verify 
01H = Verify 

None 


AL must be either 1 (verify after each disk write) 
or 0 (write without verifying). MS-DOS checks 
this flag each time it writes to a disk. 


The flag is normally off; you may wish to turn it 
on when writing critical data to disk. Because 
disk errors are rare and verification slows writ- 
ing, you will probably want to leave it off at 
other times. 


verify macro switch 
mov al,switch 


mov ah,2EH 
int 21H 
endm 


The following program copies the contents of a 
single-sided disk in drive A: to the disk in drive 
B:, verifying each write. It uses a buffer of 32K 
bytes: 


on equ 1 

off equ O 

prompt db “Source in A, target in B’,13,10 
db “Any key to start. $” 

start dw O 

buffer db 64 dup (512 dup(?)) ;64 sectors 


nn Se EE EERE 
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2EH 


Set/Reset Verify Flag 


func_2EH: 


copy: 
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display prompt 
read_kbd 
verify on 

mov cx 5 


push Cx 
abs_disk_read O,buffer,64,start 
abs_disk_write 1,buffer,64,start 


add start,64 
pop Cx 
loop copy 
verify off 


‘see Function O9H 
;see Function 08H 
‘THIS FUNCTION 
;copy 64 sectors 
-5 times 

‘save counter 

‘see Interrupt 25H 
;see Interrupt 26H 
‘do next 64 sectors 
;restore counter 
‘do it again 

‘THIS FUNCTION 


2FH 
Get Disk Transfer Address 


Call AH = 2FH 


Return ES:BX 
Points to Disk Transfer Address 


Macro 

get_dta macro 
mov 2h,2fh 
int 2ilh 


endm 
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30H 


Get DOS Version Number 


Call 


Return 


Remarks 


Macro 
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AH = 30H 


AL 

Major version number 
AH 

Minor version number 
BH 

OEM number 
BL:CX 

User number (24 bits) 


On return, AL.AH will be the two-part version 
designation; i.e., for MS-DOS 1.28, AL would be 
1 and AH would be 28. For pre-1.28 DOS AL = 0. 
Note that version 1.1 is the same as 1.10, not the 
same as 1.01. 


get_version _num macro 
mov ah,30h 
int 21h 


endm 


Call 


Return 


Remarks 


Macro 


31H 
Keep Process 


AH = 31H 
AL 

Exit code 
DX 


Memory size, in paragraphs 


None 


This call terminates the current process and 
attempts to set the initial allocation block to a 
specific size in paragraphs. It will not free up 
any other allocation blocks belonging to that 
process. The exit code passed in AX is retriev- 
able by the parent via Function 4DH. 


This method is preferred over Interrupt 27H and 
has the advantage of allowing more than 64K to 
be kept. 


' 

keep_process macro exitcode, parasize 
mov al,exitcode 

mov dx,parasize 


mov ah 3lh 
int Z2Lh 
endm 
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33H 


<CTRL C> Check 


Call 


Return 


Remarks 


Note 


Error 
Returns 
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AH = 33H 
AL 
Function 


OOH = Request current state 
01H = Set state 


DL (if setting state) 
OOH = Off 
01H = On 
DL 
OOH = Off 
01H = On 


MS-DOS ordinarily checks for a CTRL C on the 
controlling device only when doing function call 
operations 01H-0CH to that device. Function 
33H allows the user to expand this checking to 
include any system call. For example, with the 
CTRL C trapping off, all disk I/O will proceed 
without interruption; with CTRL C trapping on, 
the CTRL C interrupt is given at the system call 
that initiates the disk operation. 


Programs that wish to use calls 06H or 07H to 
read CTRL C’s as data must ensure that the 
CTRL C check is off. 


AL = FF 


The function passed in AL was not in the range 
Os. 


wy 


33H 
<CTRL C> Check 


Cy Macro 


ctrl_c_check macro switch,val 
mov dl,val 
mov. al,switch 
mov ah,33h 
int 21h 
endm 
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35H 


Get Interrupt Vector 
Call AH = 35H 
AL 


Return 


Remarks 


Macro 
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Interrupt number 


ES:BX 
Pointer to interrupt routine 


This function returns the interrupt vector asso- 
ciated with an interrupt. Note that programs 
should never get an interrupt vector by reading 
the low memory vector table directly. 


get_vector macro interrupt 
mov. al,interrupt 
mov ah,35h 
int 21h 


endm 


36H 
Get Disk Free Space 


Call 


Return 


Remarks 


Error 
Returns 


Macro 


Drive (0 = Default, 1 = A, etc.) 


AX 
FFFF if drive number is invalid; otherwise 
sectors per cluster 
BX 
Available clusters 
CX 
Bytes per sector 
DX 
Clusters per drive 


This function returns free space on a disk along 
with additional information about the disk. 


AX = FFFF 


The drive number given in DL was invalid. 


get_disk_space macro drive 
mov. dl,drive 


mov ah,36h 
int 218 
endm 
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38H 


Return Country-Dependent Information 


Call 


Return 


Remarks 


Note 
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AH = 88H 
DS:DX 

Pointer to 32-byte memory area 
AL 

Function code. 


Carry set: 
AX 
2 = file not found 
Carry not set: 
DX:DS filled in with country data 


The value passed in AL is either 0 (for current 
country) or a country code. Country codes are 
typically the international telephone prefix code 
for the country. 


If DX = -1, then the call sets the current country 
(as returned by the AL = 0 call) to the country 
code in AL. If the country code is not found, the 
current country is not changed. 


Applications must assume 382 bytes of informa- 
tion. This means the buffer pointed to by DS:DX 
must be able to accommodate 32 bytes. 


This function is fully supported only in versions 
of MS-DOS 2.01 and higher. It exists in MS-DOS 
2.0, but is not fully implemented. 


This function returns, in the block of memory 
pointed to by DS:DX, information pertinent to 
international applications. The contents of the 
block are shown in the following table. 


WO 


38H 
Return Country-Dependent Information 


WORD Date/time format 


5 BYTE ASCIIZ string 
currency symbol 


2 BYTE ASCIIZ string 
thousands separator 


2 BYTE ASCIIZ string 
decimal separator 


2 BYTE ASCIIZ string 
date separator 


2 BYTE ASCIIZ string 
time separator 


1 BYTE Bit field 


1 BYTE 
Currency places 


1 BYTE 
time format 


DWORD 
Case Mapping call 


2 BYTE ASCIIZ string 
data list separator 
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38H 


Return Country-Dependent Information 


7-112 


The format of most of the entries is ASCIIZ (a 
NUL terminated ASCII string), but a fixed size 
is allocated for each field for easy indexing into 
the table. 


The date/time format (see table) has the follow- 
ing values: 


0 — USA standard h:m:s m/d/y 
1 — Europe standard h:m:s d/m/y 
2— Japan standard y/m/dh:m:s 


The bit field contains 8 bit values. Any bit not 
currently defined must be assumed to have a 
random value. 


Bit 0 = 0 If currency symbol precedes the 
currency amount. 


= 1 If currency symbol comes after the 
currency amount. 


Bit 1 = 0 If the currency symbol is directly 
adjacent to the currency amount. 


= 1 If there is a space between the 
currency symbol and the amount. 


38H 
Return Country-Dependent Information 


Error 
Returns 


The time format has the following values: 


0 - 12 hour time 
1 - 24 hour time 


The currency places field indicates the number 
of places which appear after the decimal point 
on currency amounts. 


The Case Mapping call is a FAR procedure 
which will perform country specific lower-to- 
uppercase mapping on character values from 
80H to FFH. It is called with the character to be 
mapped in AL. It returns the correct upper case 
code for that character, if any, in AL. AL and 
the FLAGS are the only registers altered. It is 
allowable to pass this routine codes below 80H; 
however nothing is done to characters in this 
range. In the case where there is no mapping, 
AL is not altered. 


AX 
2 = file not found 


The country passed in AL was not found (no 
table for specified country). 
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38H 
Return Country-Dependent Information 


Macro ; WwW 


U 


get_country_info macro buffer, country 
mov dx,offset buffer 
mov. al,country ‘country =O 
mov ah,38h 
int 21h 
endm 
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39H 
Create Sub-Directory 


Call 


Return 


Remarks 


Error 
Returns 


Macro 


AH = 39H 
DS:DX 
Pointer to path name 


Carry set: 
AX 
3 = path not found 
5 = access denied 
Carry not set: 
No error 


Given a pointer to an ASCIIZ name, this func- 
tion creates a new directory entry at the end. 


» 


AX 
3 = path not found 


The path specified was invalid or not 
found. 


5 = access denied 


The directory could not be created (no 
room in parent directory), the directory/ 
file already existed or a device name 
was specified. 


1 
mkdir macro name 
mov dx,offset name 


mov ah,39h 
int pale 
endm 
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3AH 


Remove a Directory 


Call 


Return 


Remarks 


Error 
Returns 


Macro 
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AH = 8AH 
DS:DX 
Pointer to path name 


Carry set: 
AX 
3 = path not found 
5 = access denied 
16 = current directory 
Carry not set: 
No error 


Function 3AH is given an ASCIIZ name of a 
directory. That directory is removed from its 
parent directory. 


AX 
3 = path not found 


The path specified was invalid or not 
found. 


5 = access denied 


The path specified was not empty, not a 
directory, the root directory, or contained 
invalid information. 


16 = current directory 


The path specified was the current direc- 
tory on a drive. 


rmdir macro name 
mov dx,offset name 
mov ah,3ah 
int 2iLh 


endm 


3BH 
Change the Current Directory 


Call 


Return 


Remarks 


Error 
Returns 


Macro 


AH = 3BH 
DS:DX 
Pointer to path name 


Carry set: 
AX 

3 = path not found 
Carry not set: 

No error 


Function 3BH is given the ASCIIZ name of the 
directory which is to become the current direc- 
tory. If any member of the specified pathname 
does not exist, then the current directory is 
unchanged. Otherwise, the current directory is 
set to the string. 


AX 
3 = path not found 


The path specified in DS:DX either indi- 
cated a file or the path was invalid. 


chdir macro name 
mov dx,offset name 
mov ah,3bh 
int Zin 


endm 
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3CH 
Create a File 


Call AH = 3CH 
DS:DX 
Pointer to path name 
CX 
File attribute 


Return Carry set: 
AX 
3 = path not found 
4 = too many open files 
5 = access denied 
Carry not set: 
AX is handle number 


Remarks Function 3CH creates a new file or truncates an 
old file to zero length in preparation for writing. 
DS:DX must point to an ASCIIZ path to the file. 
If the file did not exist, then the file is created in 
the appropriate directory and the file is given 
the attribute found in CX. The given attribute 
byte is placed at offset OBH in the file’s directory 
entry. See the section on “Diskette Directory” in 
chapter 5 for details about the attribute byte. 
The file handle returned has been opened for 
read/write access. 
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f~ 


Error 


Returns 


Macro 


3CH 
Create a File 


AX 
3 = path not found 


The path specified was invalid. 
4 = too many open files 


5 = access denied 


The attributes specified in CX contained 
one that could not be created (directory, 
volume ID), a file already existed with a 
more inclusive set of attributes, or a direc- 
tory existed with the same name. 


The file was created with the specified attrib- 
utes, but there were no free handles available for 
the process, or the internal system tables were 
full. 


create_file macro name,attrib 
mov. dx,offset name 
mov cx,attrib 
mov ah,3ch 
int Z2ih 


endm 
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3DH 


Open a File Handle 


Call 


Return 


Remarks 


AH =3DH 
AL 
Access 


0 = file opened for reading 
1 = file opened for writing 
2 = file opened for both 
reading and writing 
DS:DX 
pointer to pathname 


Carry set: 
AX 
2 = file not found 
4 = too many open files 
5 = access denied 
12 = invalid access 
Carry not set 
AX is handle number 


Function 3DH associates a 16-bit handle with a 
file. 


The following values are allowed: 


ACCESS Function 
O opened for reading 
1 opened for writing 
2 opened for both reading 


and writing. 


DS:DX point to an ASCIIZ name of the file to be 
opened. 


The read/write pointer is set at the first byte of 
the file and the record size of the file is 1 byte. 
The returned file handle must be used for sub- 
sequent I/O to the file. 
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3DH 
Open a File Handle 


Error AX 
Returns 2 = file not found 


The path specified was invalid or not 
found. 


4 = too many open files 


There were no free handles available in 
the current process or the internal system 
tables were full. 


5 = access denied 


The user attempted to open a directory or 
volume-id, or open a read-only file for writ- 
ing. 


12 = invalid access 


The access specified in AL was not in the 
range 0:2. 


Macro 
open_handle macro name, access 
mov dx,offset name 
mov al,access 


mov ah,3dh 
int Zih 
endm 
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3sKH 


Close a File Handle 
Call AH = 3EH 
BX 
File handle 
Return Carry set: 
AX 


Remarks 


Error 
Returns 


Macro 
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6 = invalid handle 
Carry not set: 
No error 


If BX is passed a file handle (like that returned 
by Functions 3CH, 3DH, or 45H), Function 3EH 
closes the associated file. Internal buffers are 
flushed to disk. 


AX 
6 = invalid handle 


The handle passed in BX was not currently 
open. 


close_handle macro handle 
mov’ bx,handle 
mov ah,3eh 
int Zin 


endm 


Call 

Return 
a> 

Remarks 

Error 

Returns 
o> 


3FH 
Read From File/ Device 


AH = 3FH 
DS:DX 

Pointer to buffer 
4 

Bytes to read 
BX 

File handle 


Carry set: 
AX 
O = error set: 
6 = invalid handle 
Carry not set: 
AX = number of bytes read 


Function 3FH transfers a specified number of 
bytes from a file into a buffer location. It is not 
guaranteed that the number of bytes requested 
will be read; for example, reading from the key- 
board will read at most one line of text. If the 
returned value is zero, then the program has 
tried to read from the end of file. 


All I/O is done using normalized pointers; no 
segment wraparound will occur. 


AX 
5 = access denied 


The handle passed in BX was opened ina 
mode that did not allow reading. 


6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 
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3FH 
Read From File/ Device 


Macro a, 


read_from_handle macro buffer,bytes,handle 
mov  dx,offset buffer 
mov cx,bytes 
mov’ bx,handle 


mov ah,3fh 
int Zi 
endm 
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Call 


Return 


Remarks 


40H 
Write to a File or Device 


AH = 40H 
DS:DX 

Pointer to buffer 
CX 

Bytes to write 
BX 

File handle 


Carry set: 
AX 
© = access denied 
6 = invalid handle 
Carry not set: 
AX = number of bytes written 


Function 40H transfers a specified number of 
bytes from a buffer into a file. It should be 
regarded as an error if the number of bytes writ- 
ten is not the same as the number requested. 


The write system call with a count of zero (CX = 
OQ) will set the file size to the current position. 
Allocation units are allocated or released as 
required. 


All I/O is done using normalized pointers; no 
segment wraparound will occur. 
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40H 
Write to a File or Device 


Error AX 


Returns 5 = access denied 


The handle was not opened in a mode that 
allowed writing. 


6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 


Macro 


write_to_handle macro buffer, bytes, handle 


Mov 
mov 
mov 
mov 
int 
endm 
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dx,offset buffer 
cx, bytes 
bx,handle 
ah,40h 

21h 


Call 


Return 


Remarks 


Error 
Returns 


Macro 


41H 
Delete a Directory Entry 


AH = 41H 
DS:DX 
Pointer to path name 


Carry set: 
AX 
2 = file not found 
o = access denied 
Carry not set: 
No error 


Function 41H deletes the file named in the 
ASCIIZ string pointed to by DS:DX. 


AX 
2 = file not found 


The path specified was invalid or not 
found. 


5 = access denied 


The path specified was a directory or read- 
only. 


erase macro name 
mov. dx,offset name 
mov ah4lh 
int 21h 
endm 
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42H 


Move File Pointer 


Call 


Return 


Remarks 
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AH = 42H 
CX:DX 
Distance to move, in bytes 
AL 
Method of moving: 
(see text) 
BX 
File handle 


Carry set: 
AX 
1 = invalid function 
6 = invalid handle 
Carry not set: 
DxX:AX = new pointer location 


Function 42H moves the read/write pointer 
according to one of the following methods: 


Method Function 


O the pointer is moved to offset bytes 
from the beginning of the file 


1 the pointer is moved to the current 
location plus offset 


2 the pointer is moved to the end of file 
plus offset 


Offset should be regarded as a 32-bit integer 
with CX occupying the most significant 16 bits. 


42H 
Move File Pointer 


é \ 
Error AX 
Returns 1 = invalid function 


The function passed in AL was not in the 
range 0:2. 


6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 


Macro 
move_pointer macro highword,lowword,switch, 
handle 
mov  dx,lowword 
mov cx,highword 


tf™~ mov al,switch 


mov bx,handle 


mov ah,42h 
int Zin 
endm 
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43H 


Change Attributes 


Call 


Return 


Remarks 
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AH = 43H 
DS:DX 
Pointer to path name 
AL 
Function 
OO Return in CX 
01 Set to CX 
CX (if AL = 01) 
Attribute to be set 


Carry set: 
AX 
1 = invalid function 
3 = path not found 
5 = access denied 
Carry not set: 
CX attributes (if AL = 00) 


Given an ASCIIZ name pointed to by DS:DX, 
Function 42H will set/get the attributes of the 
file to those given in CX. See the section on 
“Diskette Directory” in chapter 5 for a descrip- 
tion of the attribute byte. 


A function code is passed in AL: 


AL Function 
O return the attributes of the file in CX 


ii set the attributes of the file to those in CX 


43H 
Change Attributes 


| a \ 
Error AX 
Returns 1 = invalid function 


The function passed in AL was not in the 
range 0:1. 


3 = path not found 
The path specified was invalid. 
5 = access denied 


The attributes specified in CX contained 
one that could not be changed (directory, 
volume ID). 


y ON Macro 


change_attrib macro name,attrib,switch 
mov dx,offset name 
mov. cx,attrib 
mov. al,switch 
mov ah,43h 
int 2lh 


endm 
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44H 
I/O Control for Devices 


Call AH = 44H 
BX 

Handle 
BL 


Drive (for function codes 4 and 5; 
0 = default, 1 = A:, etc.) 
DS:DX 
Data or buffer 
CX 
Bytes to read or write 
AL 
Function code; see text 


Return Carry set: 
AX 
1 = invalid function 
5 = access denied 
6 = invalid handle 
13 = invalid data 
Carry not set: 
Function Code = 2,3,4,5 
AX = Count transferred 
Function Code = 6,7 
AL 
00 = Not ready 
FF = Ready 


Remarks Function 44H sets or gets device information 
associated with an open handle, or sends/ 
receives a control string to a device handle or 
device. 


The inputs to AL are function numbers, for 
which there are returns. The function number 
values and functions are discussed below. 


The following values are allowed in AL as func- 
tion codes: 


7-132 


Calls 0,1: 


44H 
I/O Control for Devices 


Call Function 
O get device information (returned in DX) 
1 set device information (as determined 
by DX) 


2 read CX number of bytes into DS:DX 
from device control channel 


iS} write CX number of bytes from DS:DX 
to device control channel 


4 read CX number of bytes into DS:DX 


from disk (drive number in BL) 


5 write CX number of bytes from DS:DX 
to disk (drive number in BL) 


6 get input status 


7 get output status 


This function can be used to get information 
about device channels. Calls can be made on 
regular files, but only calls 0,6 and 7 are defined 
in that case (AL = 0,6,7). All other calls return 
an invalid function error. 


The bits of DX are defined as follows for calls 
AL =0 and AL = 1. Note that the upper byte 
MUST be zero on a set call. 
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44H 
I/O Control for Devices 


SA4 1S i218 e765 43s2i10 
RC I ERS IIZIII 
e T SOAPSSSS§S 
s R Reserved DFWECNCC 
L E Ci UO I 
V LELTWN 


ISDEV = 1 if this channel is a device 
= 0 if this channel is a disk file 
(Bits 8-15 = 0 in this case) 


If ISDEV = 1 


EOF =0if End Of File on input 
RAW =1if this device is in Raw mode 

= 0 if this device is cooked 
SPECL = 1 if this device is special 
ISCLK = 1 if this device is the clock device 
ISNUL = 1 if this device is the null device 
ISCOT = 1 if this device is the console output 
ISCIN = 1 if this device is the console input 


CTRL = 0if this device cannot do control strings 
via calls AL = 2 and AL=3 

CTRL = 1 if this device can process control 
strings via calls AL = 2 and AL =3. 

NOTE that this bit cannot be set. 


If ISDEV = 0 
EOF = 0 if channel has been written 


Bits 0-5 are the block device number for the 
channel (0 = A:, 1 = B:, ...) 
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rf, 


Calls 2..5: 


Calls 6,7: 


44H 
I/O Control for Devices 


NOTE: Bits 15,8-13,4 are reserved and should 
not be altered. 


These four calls allow arbitrary control strings 
to be sent or received from a device. The call 
syntax is the same as the read and write system 
calls, except for 4 and 5, which take a drive 
number in BL instead of a handle in BX. 


An invalid function error is returned if the 
CTRL bit (see above) is 0. 


An access denied error is returned by calls AL = 
4,5 if the drive number is invalid. 


These two calls allow the user to check if a file 
handle is ready for input or output. Status of 
handles open to a device is the intended use of 
these calls, but status of a handle open to a disk 
file is allowed, and is defined as follows: 


For input: 


Always ready (AL = FF) until EOF reached, 
then always not ready (AL = 0) unless current 
position changed via Function Request 42H 
(LSEEK). 


For output: 
Always ready (even if disk full). 


The status 1s defined at the time the system is 
CALLED. On future versions, by the time con- 
trol is returned to the user from the system, the 
status returned may NOT correctly reflect the 
true current state of the device or file. 
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44H 


I/O Control for Devices 
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Error AX 


Returns 1 = invalid function 


The function passed in AL was not in the 
range 0:7. 


5 = access denied (calls AL = 4,5) 
6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 


13 = invalid data 


Macro 


io_ctrl_dev macro handle, buffer, bytes,switch 


mov 
mov 
mov 
mov 
mov 
int 
endm 
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bx, handle ‘or 8-bit drive number 
dx,otfset buffer 

cx, bytes 

al,switch 

2h,44h 

21h 


45H 
Duplicate a File Handle 


Call 


Return 


Remarks 


Error 
Returns 


Example 


AH = 45H 
BX 
File handle 


Carry set: 
AX 
4 = too many open files 
6 = invalid handle 
Carry not set: 
AX = new file handle 


Function 45H takes an already opened file han- 
dle and returns a new handle that refers to the 
same file at the same position. 


AX 
4 = too many open files 


There were no free handles available in 
the current process or the internal system 
tables were full. 


6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 


mov bx,fh 
mov ah,45H 
int 21H 


;ax has the returned handle 
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46H 


Force a Duplicate of a Handle 


Call 


Return 


Remarks 


Error 
Returns 


Example 
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AH = 46H 
BX 

Existing file handle 
CX 

New file handle 
Carry set: 
AX 


4 = too many open files 

6 = invalid handle 
Carry not set: 

No error 


Function 46H takes an already opened file han- 
dle and returns a new handle that refers to the 
same file at the same position. If there was 
already a file open on handle CX, it is closed 
first. 


AX 


4 = too many open files 
The internal system tables were full. 
6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 


mov bx,fh 
mov cx,newth 
mov ah,46H 
int Zio 


ATH 
Return Name of Current Directory 


Call AH = 47H 
DS:SI 
Pointer to 64-byte memory area 
DL 
Drive number 


Return Carry set: 
AX 
15 = invalid drive 
Carry not set: 
No error 


Remarks Function 47H returns an ASCIIZ string giving 
the name of the current directory for a particular 
drive. The directory is root-relative and does not 
contain the drive specifier or leading path 
separator. The drive code passed in DL is 0 = 
default, 1 = A:, 2 = B:, etc. 


Error AX 
Returns 15 = invalid drive 

The drive specified in DL was invalid. 
Macro 


duplicate_handle macro handle 
mov bx,handle 
mov ah,45h 
int 21h 
endm 
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48H 


Allocate Memory 


ELLY NEIL ELL NET LEE AE NS I EO 


Call 


Return 


Remarks 


Error 
Returns 


AH = 48H 
BX 
Size of memory to be allocated in paragraphs 


Carry set: 
AX 
7 = arena trashed 
8 = not enough memory 
BX 
Maximum size that could be allocated 
Carry not set: 
AX:0 
Pointer to the allocated memory 


Function 48H returns a pointer to a free block of 
memory that has the requested size in 
paragraphs. 


AX 
7 = arena trashed 


The internal consistency of the memory 
arena has been destroyed. This is due to a 
user program changing memory that does 
not belong to it, thus destroying the 
memory manager allocation marks. 


8 = not enough memory 


The largest available free block is smaller 
than that requested or there is no free 
block. 
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48H 
Allocate Memory 


Macro 
force_handle macro old,new 
mov bx,old 
Mov cx,new 
mov ah,46h 
int Z2ih 
endm 
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49H 


Free Allocated Memory 


Call 


Return 


Remarks 


Error 
Returns 


Macro 
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Segment address of memory 
area to be freed 


Carry set: 
AX 
7 = arena trashed 
9 = invalid block 
Carry not set: 
No error 


Function 49H returns a piece of previously allo- 
cated memory to the system pool. 


AX 
7 = arena trashed 


The internal consistency of the memory 
arena has been destroyed. This is due to a 
user program changing memory that does 
not belong to it, thus destroying the 
memory manager allocation marks. 


9 = invalid block 


The block passed in ES is not one allo- 
cated via Function Request 48H. 


' 

cur_dir_name macro buffer,drive 
mov si,offset buffer 
mov dl,drive 


mov ah,47h 
int 21h 
endm 


4AH 
Modify Allocated Memory Blocks 


Call AH = 4AH 
ES 
Segment address of memory area 
BX 


Requested memory area size 


Return Carry set: 
AX 
7 = arena trashed 
8 = not enough memory 
9 = invalid block 
BX 
Maximum size possible 
Carry not set: 
No error 


Remarks Function 4AH will attempt to grow/shrink an 
allocated block of memory. 


Error AX 
Returns 7 = arena trashed 


The internal consistency of the memory 
arena has been destroyed. This is due toa 
user program changing memory that does 
not belong to it, thus destroying the 
memory manager allocation marks. 


8 = not enough memory 


There was not enough free memory after 
the specified block to satisfy the grow 
request 


9 = invalid block 


The block passed in ES is not one allo- 
cated via tl 's function. 
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4AH 
Modify Allocated Memory Blocks 


Macro 
alloc_mem macro size 
mov’ bx,size 
mov ah,48h 
int 21h 


endm 
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4BH 


Load and Execute a Program (EXEC) 


Call 


Return 


Remarks 


AH = 4BH 
DS:DX 
Pointer to pathname 
ES:BX 
Pointer to parameter block 
AL 
00 = Load and execute program 
03 = Load program 


Carry set: 
AX 
1 = invalid function 
2 = file not found 
8 = not enough memory 
10 = bad environment 
11 = bad format 
Carry not set: 
No error 


This function allows a program to load another 
program into memory and optionally begin exe- 
cution of it. DS:DX points to the ASCIIZ name 
of the file to be loaded. ES:BX points to a 
parameter block for the load. 


A function code is passed in AL: 


AL Function 


O load and execute the program. A pro- 
gram header is established for the pro- 
gram and the terminate and CTRL C 
addresses are set to the instruction after 
the EXEC system call. 


3 load (do not create) the program header, 
and do not begin execution. This is use- 
ful in loading program overlays. 
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4BH 


Load and Execute a Program (EXEC) 
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For each value of AL, the block has the format 
shown in the following table. 


AL =0O- load/execute program 


WORD segment address of 
environment. 


DWORD pointer to command 
line at 80H of Program Segment Prefix 


DWORD pointer to default 
FCB to be passed at 5CH of PSP 


DWORD pointer to default 
FCB to be passed at 6CH of PSP 


AL = 3 - load overlay 


WORD segment address where 
file will be loaded. 


WORD relocation factor to 
be applied to the image. 


Note that all open files of a process are duplicat- 
ed in the child process after an EXEC. This is 
extremely powerful; the parent process has con- 
trol over the meanings of stdin, stdout, stderr, 
stdaux and stdprn. The parent could, for exam- 
ple, write a series of records to a file, open the 
file as standard input, open a listing file as stan- 
dard output and then EXEC a sort program that 
takes its input from stdin and writes to stdout. 


Ww 


ed 


4BH 
Load and Execute a Program (EXEC) 


Also inherited (or passed from the parent) is an 
“environment.” This is a block of text strings 
(less than 32K bytes total) that convey various 
configurations parameters. The format of the 
environment is as follows: 


(paragraph boundary) 


BYTE ASCIIZ string 1 
BYTE ASCIIZ string 2 
BYTE ASCIIZ string n 
BYTE of zero 


Typically the environment strings have the 
form: 


parameter = value 


For example, COMMAND.COM might pass its 
execution search path as: 


PATH=A:\BIN;B:\BASIC\LIB 
A zero value of the environment address causes 


the child process to inherit the parent’s envi- 
ronment unchanged. 
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4BH 
Load and Execute a Program (EXEC) 
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Error AX 
Returns 1 = invalid function 


The function passed in AL was not 0 or 3. 
2 = file not found 


The path specified was invalid or not 
found. 


8 = not enough memory 


There was not enough memory for the 
process to be created. 


10 = bad environment 
The environment was larger than 32Kb. 
11 = bad format 


The file pointed to by DS:DX was in .EXE 
format and contained information that 
was internally inconsistent. 


Macro 
free_memory macro address 
mov ax,address 
mov es,ax 


mov ah,49h 
int Zin 
endm 
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4CH 
Terminate a Process 


Call 


Return 


Remarks 


Macro 


AH = 4CH 
AL = Return code 


None 


Function 4CH terminates the current process 
and transfers control to the invoking process. In 
addition, a return code may be sent. All files 
open at the time are closed. 


This method is preferred over all others (Inter- 
rupt 20H, JMP 0) and has the advantage that 
CS:0 does not have to point to the Program 
Header Prefix. 


modify_memory macro address, size 
mov ax,address 
MOv_ es,ax 
mov. bx,size 
mov ah,4ah 
int 21h 
endm 
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4DH 


Retrieve the Return Code of a Child 


Call 


Return 


Remarks 


Macro 
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AH = 4DH 
AX 
Exit code 


Function 4DH returns the Exit code specified by 
a child process. It returns this Exit code only 
once. The low byte of this code is that sent by 
the Exit routine. The high byte is one of the 
following: 


0 - Terminate/abort 
1-CTRLC 

2 - Hard error 

3 - Terminate and stay resident 


U 


exec macro path, param,switch 


mov 
mov 
mov 
mov 
int 
endm 


dx,offset path 
bx,offset param 
al,switch 
ah,4bh 

21h 


4EKH 
Find Match File 


Call 


Return 


Remarks 


AH = 4EH 
DS:DX 

Pointer to pathname 
CX 

Search attributes 


Carry set: 
AX 
2 = file not found 
18 = no more files 
Carry not set: 
No error 


Function 4EH takes a pathname with wild card 
characters in the last component (passed in an 
ASCIIZ string pointed to by DS:DX) along with 
a set of attributes (passed in CX) and attempts 
to find all files that match the pathname and 
have a subset of the required attributes. A 
datablock at the current DTA is written that 
contains information in the following form: 


find_buf_reserved DB 21 DUP (?); Reserved* 
find_buf_attr DB ? ;attribute found 
find_buf_time DW ? ;time 

find_buf_date DW ? ;date 

find_buf_size_] DW ? ;low(size) 
find_buf_size_h DW ? ;high(size) 
find_buf_pname DB13 DUP (?) ;packed name 
find_buf ENDS 


*Reserved for MS-DOS internal use on subsequent 
find_nexts 


To obtain the subsequent matches of the path- 
name, see the description of Function 4FH. 
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4EH 
Find Match File 
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Error AX 
Returns 2 = file not found 


The path specified in DS:DX was an 
invalid path. 


18 = no more files 


There were no files matching this specifi- 
cation. 


Macro 
terminate_process macro code 
mov al,code 
mov ah,4ch 
int 2lh 
endm 
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AFH 
Step Through a Directory Matching 
Files 


Call AH = 4FH 


Return Carry set: 
AX 
18 = no more files 
Carry not set: 
No error 


Remarks The current DTA address must point at a block 
returned by Function 4EH (see Function 4EH). 


Error AX 
Returns 18 = no more files 
There are no more files matching this 
pattern. 
Macro ; 
retrieve_code macro 
mov ah,4dh 
int Z2ih 
endm 
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54H 
Return Current Setting of Verify 
After Write Flag 


Call AH = 54H 


Return AL 
Current verify flag value 


Remarks The current value of the verify flag is returned 
in AL. 


Macro ; 
find_match macro name,attrib 
mov dx,offset name 
mov. cx,attrib 
mov ah,4eh 
int 2Lh 
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56H 
Move a Directory Entry 


Call 


Return 


Remarks 


Error 
Returns 


AH = 56H 

DS:DX 
Pointer to pathname of 
existing file 

ES:DI 
Pointer to new pathname 


Carry set: 
AX 
2 = file not found 
5 = access denied 
17 = not same device 
Carry not set: 
No error 


Function 56H attempts to rename a file into 
another path. The paths must be on the same 
device. 


AX 
2 = file not found 


The file name specifed by DS:DX was not 
found. 


5 = access denied 


The path specified in DS:DX was a direc- 
tory or the file specified by ES:DI already 
exists or the destination directory entry 
could not be created. 


17 = not same device 


The source and destination are on differ- 
ent drives. 
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56H 
Move a Directory Entry 


Macro 
step_match macro 
mov ah,4th 
int Zi 


endm 
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57H 
Get/Set Date/Time of File 
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Call 
Return 
| tin’ 
Remarks 
i> 


AH = 57H 
AL 
00 = get date and time 
01 = set date and time 
BX 
File handle 
CX af AL = 01) 
Time to be set 
DX af AL = 01) 
Date to be set 


Carry set: 
AX 
1 = invalid function 
6 = invalid handle 
Carry not set: 
No error 
CX/DxX set if function 0 


Function 57H returns or sets the last-write time 
for a handle. These times are not recorded until 
the file is closed. 


A function code is passed in AL: 
AL Function 


O return the time/date of the handle in 
CxX/DA 


1 set the time/date of the handle to 
CX/DX 


The format for the date and time is the same as 
the date and time fields for a directory entry, 
except that the individual bytes in each word are 
reversed. The high order portion of the time is in 
CL, and the high order portion of the date is in 
DL. 
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Error AX 
Returns 1 = invalid function 


The function passed in AL was not in the 
range 0:1. 


6 = invalid handle 


The handle passed in BX was not cur- 
rently open. 


Macro ; 
check_verify_flag macro 
mov ah,54h 
’ int 21h 
endm 
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Note These macro definitions apply to system call 
examples 00H through 57H. 


U 
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Ul 


; Interrupts 


a RRKKKKKKKKKKKKKKKKEK 


1 


Ul 


;ABS_DISK_READ 


abs_disk_read macro disk, buffer, num_sectors, first_sector 


mov 
mov 
mov 
mov 
int 
popt 
endm 


/ 


al,disk 

bx, offset buffer 
cx,num_sectors 
dx,first_sector 


20H 


‘interrupt 25H 


;ABS_DISK_WRITE 


abs_disk_write macro disk, buffer, num_sectors, first_sector 


mov 
mov 
mov 
mov 
int 
popt 
endm 


U 


al,disk 

bx,offset buffer 
cx,num_sectors 
dx,first_sector 


26H 


stay_resident macro last_instruc 


mov 
inc 
int 
endm 


dx,offset last_instruc 
dx 
21H 


aRRKKKKKKKKKKKKKKKKEK 


Uy 


; Functions 


KKK KKKKKKKKKKKKEKEK 


/ 


Uy 


‘interrupt 26H 


;STAY_RESIDENT 


‘interrupt 27H 
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cond Ieba-and seh macro -READ_KBD_AND_ECHO 


mov ah,l ‘function 1 
int Zin 
endm 
display_char macro character ‘DISPLAY_CHAR 
mov dl,character 
mov ah,2 ‘function 2 
int Zin 
endm 
aux_input macro -AUX_INPUT 
mov ah,3 ‘function 3 
int Zin 
endm 
aux_output macro ‘-AUX_OUTPUT 
mov ah,4 ‘function 4 
int 21H 
endm 
print_char macro character ‘PRINT_CHAR 
mov dl,character 
mov ah,5 ‘function 5 
int 21H 
endm 
dir_console_io macro switch ‘DIR-CONSOLE_IO 
mov dl,switch 
mov ah,6 ‘function 6 
int 21H 
endm 
dir_console_input macro ‘DIR-CONSOLE_INPUT 
mov ah,7 ‘function 7 
int 21H 
endm 
read_kbd macro ‘-READ_KBD 
mov ah,8 ‘function 8 
int ZL 
endm 


i EEE aT 
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display macro string ;DISPLAY 
mov dx,offset string 
Mov ah,9 ;function 9 
int 21H 
endm 

get_string macro limit,string ;GET_STRING 
mov string, limit 
mov dx,offset string 
mov ah,OAH ‘function OAH 
int 21H 
endm 

check_kbd_status macro ;CHECK_KBD_STATUS 
mov ah,OBH ‘function OBH 
int Zin 
endm 


flush_and_read_kbd macro switch ;FLUSH_AND_READ_KBD 


mov al,switch 


mov ah,OCH ;ftunction OCH 
int 21H 
endm 

reset_disk macro ;RESET DISK 
mov ah,ODH ‘tunction ODH 
int 21H 
endm 

select_disk macro disk ;SELECT_DISK 
mov dl,disk[-65] 
mov ah,OEH ;function OEH 
int 21H 
endm 

open macro fcb ‘OPEN 
mov dx,offset fcb 
mov ah,OFH ‘function OFH 
int 21H 
endm 
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close macro fcb 
mov dx,offset fcb 
mov ah, 10H 
int Zinn 


endm 


search_first macro fcb 
mov dx,offset fcb 
mov ah,l11H 
int 21H 
endm 

search_next macro fcb 
mov dx,offset fcb 
mov ah,12H 
int 2418 
endm 


delete macro fcb 
mov dx,offset icb 
mov ah,13H 
int 21H 
endm 

read_seq macro fcb 
mov dx,offset fcb 
mov ah, 14H 
int Zin 
endm 

write_seq macro fcb 
mov dx,offset fcb 
mov ah,15H 
int 21H 
endm 

create macro fcb 
mov dx,offset fcb 
mov ah, 16H 
int 21H 
endm 


CLOSE 


‘function 10H 


;SSEARCH_FIRST 


‘function 11H 


;SSEARCH_NEXT 


‘function 12H 


; DELETE 


‘function 13H 


‘-READ_SEQ 


‘function 14H 


;WRITE_SEQ 


‘function 15H 


‘CREATE 


‘function 16H 


U 


rename macro special_fcb 
mov dx,offset special_fcb 


mov ah,17H 
int 21H 
endm 


current_disk macro 
mov ah, 19H 
int ZLe 
endm 

set_dta macro buffer 
mov dx,offset buffer 
mov ah, l1AH 
int 21H 
endm 

read_ran macro fcb 
mov dx,offset fcb 
mov ah,21H 
int 21H 
endm 

write_ran macro fcb 
Mov dx,offset fcb 
mov ah,22H 
int Zin 
endm 

file_size macro fcb 
mov dx,offset fcb 
Mov ah,23H 
int 21H 


endm 


;RENAME 


;tunction 17H 


;CURRENT_DISK 
‘function 19H 


;SET_DTA 


‘function 1AH 


;READ_RAN 


‘function 21H 


;WRITE_RAN 


ifunction 22H 


;FILE_SIZE 


‘function 23H 
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set_relative_record macro fcb 
mov dx,otfset fcb 
mov ah,24H 
int 210 


endm 


;SET_RELATIVE_RECORD 


‘function 24H 


set_vector macro interrupt,seg_addr,off_addr ;SET_VECTOR 


push ds 

Mov ax,seg_addr 
mov ds,ax 

mov dx,off_addr 
mov al,interrupt 
mov ah,25H 

int Zi1H 


endm 


‘function 25H 


ran_block_read macro fcb,count,rec_size;RAN_BLOCK_READ 


mov dx,otfset fcb 
mov cx ,count 


mov word ptr fcb[14], rec_size 


mov ah,27H 
int 21H 


endm 


‘function 27H 


ran_block_write macro fcb,count,rec_size;RAN_BLOCK_WRITE 


mov dx,offset fcb 
mov CX, COUNT 


mov word ptr fcb[14], rec_size 


mov ah,28H 
int 21H 


endm 


‘function 28H 


WO 


/ 


parse macro filename, fcb 


mov si,offset filename 
mov di,otiset fcb 
push es 

push ds 

pop es 

mov al,OFH 

mov ah, 29H 

int 21H 

pop es 

endm 


get_date macro 
mov ah,2AH 
int 21H 


endm 


set_date macro year,month,day 
mov cx, year 
mov dh,month 
mov dl,day 
mov ah,2BH 
int 21H 
endm 
get_time macro 
mov ah,2CH 
int 2in 


endm 


U 


;PARSE 


‘function 29H 


;GET_DATE 
‘function 2AH 


;SET_DATE 


‘function 2BH 


;GET_TIME 


‘function 2CH 


;SET_TIME 


set_time macro hour, minutes, seconds, hundredths 


mov ch,hour 

mov cl,minutes 
mov dh,seconds 
mov dl,hundredths 
mov ah,2DH 

int ZL 


endm 


‘function 2DH 
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U 


verify macro switch 


mov al,switch 
mov ah,2EH 
int ZALr 
endm 


/ 


get_dta macro 


mov ah,2FH 
int 21H 
endm 


U 


get_version_num macro 


mov ah,30H 
int pals! 
endm 


/ 
keep_process macro exitcode, parasize 


mov al,exitcode 
mov dx,parasize 
mov ah,31H 

int Zio 

endm 


ctrl_c_check macro switch, val 


mov dl,val 
mov al,switch 
mov ah,33H 
int 21H 
endm 


U 


get_vector macro interrupt 


mov al,interrupt 
mov ah,35H 

int 21H 

endm 


get_disk_space macro drive 


mov dil1,drive 
mov 2h,36H 
int ZL 
endm 


; VERIFY 


‘function 2EH 


;GET_DTA 


;GET_VERSION_NUM 


;KEEP_PROCESS 


;CTRL_C_CHECK 


;GET_VECTOR 


;GET_DISK_SPACE 


WwW 


WO 


/ 


get_country_info macro buffer,country 


mov dx,offset buffer 
mov al,country 
mov ah,38H 

int ZALE 

endm 


J 
mkdir macro name 


mov dx,offset name 
mov ah,39H 

int 21H 

endm 


U 


rmdir macro name 


mov dx,offset name 
mov ah,3AH 

int 21H 

endm 


/ 
chdir macro name 


mov dx,offset name 
mov ah,3BH 

int ZiH 

endm 


/ 
create_file macro name,attrib 


mov dx,offset name 
mov cx,attrib 

mov ah,3CH 

int ZL 

endm 


/ 
open_handle macro name,access 


Mov dx,offset name 
mov al,access 

Mov ZN, oie 

int Zin 

endm 


;GET_COUNTRY_INFO 


‘country =O 


;MKDIR 


;RMDIR 


;CHDIR 


;CREATE_FILE 


;OPEN_HANDLE 
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close_handle macro handle ;CLOSE_HANDLE 


mov bx,handle 
mov 2h,3EH 
int 2in 
endm 


read_from_handle macro buffer, bytes, handle 


;READ_FROM_HANDLE 


mov dx,offset buffer 
mov cx, bytes 

mov bx,handle 

mov ah,3FH 

int 21H 

endm 


write_to_handle macro buffer,bytes,handle 


;WRITE_TO_HANDLE 


mov dx,offset buffer 
mov cx, bytes 
mov bx,handle 
mov ah,40H 
int 210 
endm 

erase macro name ;ERASE 
mov dx,offset name 
mov ah,41H 
int Zi 
endm 


move_pointer macro highword,lowword,switch,handle 


;MOVE_POINTER 


mov dx,lowword 
mov cx,highword 
mov al,switch 
mov bx,handle 
mov ah,42H 

int 21H 

endm 
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change_attrib macro name,attrib,switch ;CHANGE_ATTRIB 


mov dx,offset name 
mov cx,attrib 

mov al,switch 

mov 2h,43H 

int Zin 

endm 


io_ctr!_dev macro handle, buffer, bytes,switch 


1O_CTRL_DEV 
mov bx, handle ‘or 8-bit drive number 
mov dx,offset buffer 
mov cx, bytes 
mov al,switch 
mov ah,44H 
int 21H 
i> endm 
duplicate_handle macro handle ;DUPLICATE_HANDLE 
mov bx,handle 
mov ah,45H 
int ZLH 
endm 
force_handle macro old,new ‘“FORCE_HANDLE 
mov bx,old 
mov cx,new 
mov ah,46H 
int 21H 
endm 
cur_dir_name macro buffer,drive ‘CUR_DIR_NAME 
mov si,offset buffer 
mov dl,drive 
fm™, mov ah,47H 
int Zin 
endm 
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alloc_mem macro size 


mov bx,size 
mov ah,48H 
int 21H 
endm 


U 


free_memory macro address 


mov ax,address 
mov es,ax 

mov ah,49H 

int 21H 

endm 


/ 
modify_memory macro address,size 


mov ax,address 
mov | es,ax 

mov bx,size 
mov ah,4AH 

int 21H 

endm 


/ 


exec macro path, param,switch 


mov dx,offset path 
mov bx,offset param 
mov al,switch 

mov ah,4BH 

int a 

endm 


U 


terminate_process macro code 


mov al,code 
mov ah,4CH 
int Zin 
endm 


U 


retrieve_code macro 


mov ah,4DH 
int 21H 
endm 


;ALLOC_MEM 


;FREE_MEMORY 


;MODIFY_MEMORY 


ry ee 


;TERMINATE_PROCESS 


;RETRIEVE_CODE 


find_match macro name,attrib 


mov dx,offset name 
mov cx,attrib 

mov ah,4EH 

int 21H 

endm 


U 


step_match macro 


mov ah,4FH 
int 21H 
endm 


check_verify_flag macro 


mov ah,54H 
int 21H 
endm 


U 


rename macro old,new 


mov dx,offset old 
mov di,otfiset new 
Mov ah,56H 

int 21H 

endm 
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;FIND_MATCH 


;STEP_MATCH 


;CHECK_VERIFY_FLAG 


;RENAME 


date_time_of_file macro switch,handle,date,time 


mov al,switch 
mov bx,handle 
mov cx,time 
mov dx,date 
mov ah,57H 
int 21H 
endm 


;DATE_TIME_OF_FILE 
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; General 


aeekkkkkkkkkkkkkkeke 


U 


move_string macro source, destination, num_bytes 


push 
mov 
mov 
mov 
mov 
mov 
rep movs 
pop 
endm 
' 


U 


‘MOVE_STRING 
es 
ax,ds 
es,ax 
si,offset source 
di,offset destination 
cx,num_bytes 
es:destination,source 
es 


convert macro value, base, destination ;CONVERT 


local 
jmp 
table db 
start: mov 
xor 
xOr 
div 
mov 
mov 
mov 
mov 
mov 
mov 
endm 


table, start 

start 
“0123456789 ABCDEF"” 
al,value 

ah,ah 

bx, bx 

base 

bl,al 

al,cs: table[bx] 
destination,al 
blah 

al,cs: table[bx] 
destination[1],al 


F 
convert_to_binary macro string, number, value 


;CONVERT_TO_BINARY 


local ten,start,calc,mult,no_mult 
jmp start 
ten db 10 
start: mov value,O 
xor Cx, CX 
mov cl,hnumber 
XOr $i,Sl 
calc: XOr ax,ax 
mov al,string[si] 
sub al,48 
cmp cx,2 
jl no_mult 
push Cx 
dec cx 
mult: mul cs:ten 
loop mult 
pop Cx 
no_mult: add value,ax 
inc si 
loop calc 
endm 


/ 


convert_date macro dir_entry 


mov dx,word ptr dir_entry[25] 
mov c1,5 
shr dl,cl 
mov dh,dir_entry[25] 
and dh,1lfh 
xor Cx, CX 
mov cl,dir_entry[26] 
shr cl,1 
add cx, 1980 
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ROM BIOS 
Service 
Routines 


Overview 


This chapter describes the ROM BIOS service 
routines that are provided to perform the more 
low-level functions that you may need in your 
assembly language programs. Because these are 
low-level routines, they provide more direct 
access to the hardware than the DOS routines. 
However, they do not provide some of the protec- 
tion and conveniences that the DOS routines 
give. Be sure to check the chapter on “System 


Calls” to make your choice between similar DOS 
and BIOS calls. 


8-2 


ROM BIOS 
Service 
Routines 


Conventions 
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Access to the BIOS service routines is through 
the 8086 software interrupts. The routines are 
called with conventions that are very similar to 
the conventions for calling DOS routines. 


To issue a BIOS interrupt, use the Interrupt 
statement to select the desired interrupt: 


INT 11H 


Some interrupts, like Interrupt 11H (Equipment 
List), perform only one function. Others, like 
Interrupt 13H (Diskette Services), have several 
sub-functions that you can call. To select a sub- 
function, move the number of the sub-function 
into the AH register. 


This chapter describes the register usage for 
each of the BIOS service routines. It is usually 
wise to save all important registers before call- 
ing a BIOS service routine. 
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ROM BIOS 


Service 
Routines 
Interrupt Vector List 
| os, ae Rm EE EE PS? 
Interrupt 
Number 
(Hex) Name 
5 Print Screen 
10 Video 
i Equipment Check 
12 Determine Memory Size 
13 Diskette 
14 Communications 
16 Keyboard 
17 Printer 
19 Bootstrap 
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Introduction 


Monochrome 
Text Mode 


The video controller on the standard AT&T Per- 
sonal Computer 6300 supports both monochrome 
and color monitors and produces text or graph- 
ics for both color and monochrome. Interrupt 
10H has the BIOS services to support all of these 
modes. This section describes the details that 
pertain to each major type of video access. 


The monochrome text modes are mode 0 — 
40x25 characters and mode 2 — 80x25 charac- 
ters. The monochrome text mode uses 32K start- 
ing at B8000H. For each screen position, there 
are two bytes in memory. The first byte is the 
ASCII code for the character to be displayed. 
The second byte is the “attribute” that specifies 
how the character is to be displayed. This 
attribute byte controls brightness, underlining, 
and blinking. 


The low order nybble of the attribute byte gov- 
erns the character being displayed according to 
the following table: 


Value Meaning 
0 Character is black 
1 Character is normal (white) 
intensity, underlined 
| Character is normal (white) 
intensity 


F Character is high intensity white 


Any other value for the low nybble selects a par- 
ticular gray character intensity. 


The high order nybble of the attribute byte gov- 
erns the character background and blinking. A 
displayed character will blink if the high order 

bit of its attribute byte is set. The remaining 
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three bits select the gray scale of the background 
— again, 000 is black and 111 is white. Note that 
inverse video can be obtained by forcing a black 
character on a white background, 1.e. an attri- 
bute byte of 70H. 


The first two bytes in the display memory con- 
trol the character in the top left corner of the 
screen. The next two bytes control the character 
in the top row, in the second column position, 
and so on. 


At the end of each line, the display memory re- 
turns to the first column of the next line. There 
are no gaps in the display storage, and no bound- 
aries between one line and the next. 


Eight pages of memory are used to build up to 
eight separate screens. Only one page is active 
at any time, but you can switch the active page 
number and thereby display screens very 
rapidly. 


The display pages are numbered 0 - 7 for 40x25 
mode and 0 - 3 for 80x25 mode. Page 0 starts at 
memory location B8000H. For 40 column mode, 
the pages occur at 2K intervals; for 80 column, 
at 4K intervals. A total of 32K of memory is 
used. 
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Color Text 
Modes 


The color text modes are mode 1 — 40x25 color 
mode and mode 3 — 80x25 color. 


Memory usage for the color text modes is similar 
to the method used for monochrome text. Two 
bytes of memory are used for each character 
position: the first is the ASCII code for the char- 
acter and the second is the attribute byte. The 
attribute byte specifies blinking, brightness, and 
color. 


The attribute bytes in color text mode operate 
much the same way as they do in monochrome 
text modes with two major differences: 


Instead of bits 0-3 and 4-7 selecting the gray 
scale of the foreground and background, they 
select foreground and background colors accord- 
ing to the following chart: 


Bit 
dcba Color 
0000 _ Black 
0001 4Blue 
0010 °£4Green 
0011 Cyan 
0100 £42¥Red 
0101 £Magenta 
0110  £4Brown 
0111 + #£4=White 
1000 = £4Grey 
1001 Lt. blue 
1010 _ Lt. green 
10141 £4Lt.cyan 
1100 _ = #£4Lt.red 
11041 £441t. magenta 
11310 = £27° ellow 
1 111° #£44High intensity white 
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Note that since background color is determined 
by a three-bit value, only the first eight colors 
apply to that field. 


There is no underline attribute possible in color 
mode. As can be seen by the chart above, attri- 
bute settings that produce an underline in 
monochrome mode produce a blue character in 
color mode. 


The display memory maps to the character posi- 
tions exactly as it does in monochrome text 
mode. 


There is one color graphics mode: mode 4 — 
medium resolution (320x200) color graphics. For 
any color display, you can use up to four colors. 
You select from one of two “palettes,” each of 
which provides three colors. You select a “back- 
ground” color to be used as the fourth color. 


Palette 0 contains green, yellow, and red. 
Palette 1 contains cyan (light blue), magenta, 
and white. 


320 pixels can be displayed on each of 200 lines. 
Each line takes 80 bytes or 640 bits of display 
memory. Each color pixel use two bits of 
memory. Since two bits give you four possible 
combinations, for each pixel you specify either 
the background color or one of the three colors in 
the current palette. The leftmost pixels are 
represented by the high order bits in the byte. 
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Display memory for color graphics mode starts 
at location B8000H and is divided into four 8K 
blocks. Starting at B8000, the first 8000D bytes 
contain the pixel data for the even scan lines on 
page zero. That is, the first 80 bytes describe line 
0, the next 80H describe line 2, and so on 
through line 198. The odd lines are described in 
the 8K block starting at BA000. The same pat- 
tern 1s repeated for page one in the next 16K 
block, with the even lines starting at BC000 and 
the odd lines starting at BE000. 


Memory for high resolution 640x200 mono- 
chrome graphics is handled similarly to 320x200 
color graphics. The only difference is that 
instead of memory containing two bits of color 
information per pixel, each pixel can only be on 
or off and is thus represented by one bit. In this 
way eight pixels can be represented in a byte 
instead of four, so that a scan line takes as 
many bytes as in color graphics mode even 
though it contains twice as many pixels. As in 
color graphics mode, the leftmost pixels are 
represented in the high order bits of each byte. 
Line mapping is exactly as described above for 
color graphics mode. In high resolution mono- 
chrome graphics the background color is always 
black and the foreground color is chosen by bits 
0-3 of the color select register. 
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Super High 
Resolution 
Monochrome 
Graphics 
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Super high resolution 640x400 monochrome 
graphics mode maps one bit per pixel with the 
leftmost pixel represented at the high end of the 
byte, just like high resolution 640x200 mode. 
Also like high resolution mode, super high mode 
maps onto a black background with a fore- 
ground color chosen by the color select register. 
The memory mapping, however, takes up all 
32K of display memory for a single page. 
Memory is broken up into four 8K segments, 
with each segment containing the data for every 
fourth scan line. Thus display memory looks like 
this: 


Memory 
location Contains pixels for line numbers 
B8000 O, 4, 8, ... 396 
B9OF38F | Not used. 
BAO00 1, 5, 9, «. 397 
BBF8F | Not used. 
BCO0O | 2,6, 10, ... 398 
BDF8F | Not used. 
BEOOO | 3,7, 11, ... 399 
BFF3F | Not used. 
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and Clear 
Screen 


Set Cursor 


Type 


Set Cursor 
Position 


Input: 
(AH) =0 
(AL) contains the CRT mode value 


Text Modes: 

(AL) = 0 40x25 monochrome 
(AL) = 1 40x25 color 

(AL) = 2 80x25 monochrome 
(AL) = 3 80x25 color 


Graphics modes: 

(AL) = 4 320x200(medium resolution), color 

(AL) = 5 320x200(medium resolution), 

monochrome 

(AL) = 6 640x200 black/white (high resolution) 

(AL) = 40H graphics 640x400 monochrome 
super high resolution 

(AL) = 48H graphics 640x400 monochrome 
tiny text (80x50 text) 


Input: 
(AH) =1 
Low order 5 bits of (CH) = start line for cursor. 


Note 
Do not set the high bits of CH: unpredictable 
results will occur. 


Low order 5 bits of (CL) = end line for cursor. 


Input: 
(AH) = 2 
(DH,DL) = Row,Column (Position 0,0 is upper 
left.) 
(BH) = page number (must be 0 for super-res 
graphics mode.) 
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Read 
Cursor 
Position 


Read 
Light Pen 
Position 


Select 
Active 
Page 
Number 


Input: 

(AH) =3 

(BH) = page number (must be 0 for super-res 
graphics mode.) 


Output: 
(DH,DL) = row, column of current cursor 
(CH,CL) = current cursor start and end lines 


Input: 
(AH) = 4 


Output: 
(AH) = 0 light pen switch not triggered 
(AH) = 1 valid light pen value obtained: 
(DH,DL) = row, column of character 
light pen position 
(CH) = raster line (0-199) 
(BX) = pixel column (0-319 for medium 
resolution, 0-639 for high 
resolution.) 


Valid only for modes (0 - 6) 


Input: 

(AH) =5 

(AL) = 0-15 for modes 0, 1 
= 0-7 for modes 2, 3 
= 0-1 for modes 4, 6 


ii 
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Scroll Active 
Page up 


Scroll Active 
Page Down 


Character 
Handling 


Input: 
(AH) =6 
(AL) = number of lines blanked at bottom of 
window by scrolling up. AL = 0 means 
blank entire window. 
(CH,CL) = row, column of upper left corner of 
scroll 
(DH,DL) = row, column of lower right corner of 
scroll 
(BH) = attribute to be used on blank line(s). 


Input: 
(AH) = 7 
(AL) = number of lines blanked at top of 
window by scrolling down. AL = 0 means 
blank entire window. 
(CH,CL) = row, column of upper left corner of 
scroll 
(DH,DL) = row, column of lower right corner of 
scroll 
(BH) = attribute to be used on blank line(s). 


The next three video services perform character 
input/output for the CRT. If your program dis- 
plays characters to the screen while in graphics 
modes, the characters are formed from a charac- 
ter generator image that is maintained in the 
ROM. However, only the first 128 characters are 
encoded there. If you want to create your own 
characters, either for the purposes of doing 
character graphics or implementing a foreign 
language alphabet, you must set up a table of 
code points for 128 new characters and initialize 
the pointer at interrupt 1F (address 0007CH) to 
point to the 1K table. These codes can then be 
accessed by referring to characters 128-255. 
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Read 
Attribute or 
Character at 
Current 
Cursor 
Position 


Write 
Attribute and 
Character at 
Current 
Cursor 
Position 


Write 
Character 
Only at 
Current 
Cursor 
Position 
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When you write characters to the screen in text 
mode, if you send more characters to be written 
than will fit on one line, the extra characters 
automatically wrap around to the beginning to 
the next line. In graphics mode, the character 
handling routines only produce correct results 
for characters contained on the same row (con- 
tinuation to succeeding lines does not work.) 


Input: 
(AH) =8 
(BH) = current display page 


Output: 
(AL) = character read 
(AH) = attribute of character read 


Input: 

(AH) =9 

(BH) = current display page 

(CX) = count of characters to write 

(AL) = character to write 

(BL) = attribute of character (if text mode) 
= color of character (if graphics mode) 


Note 
If bit 7 of BL = 1, the color value is exclusive 
OR’d with the current contents of the dot. 


Input: 

(AH) = OAH 

(BH) = current display page 

(CX) = count of characters to write 
(AL) = character to write 
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Set Color 
Pallette 


Write Dot 


Read Dot 


Input: 

(AH) = OBH 

(BH) = color palette ID (0-127) 

(BL) = color value to be used with that color ID 


Color ID = 0 selects the background color (0-15) 
Color ID = 1 selects the palette to be used: 

O = green/red/yellow 

1 = cyan/magenta/white 


Input: 

(AH) = OCH 

(DX) = row number 

(CX) = column number 

(AL) = color value. If bit 7 of AL = 1, the color 
value is exclusive OR’d with the current 
contents of the dot. 


Input: 

(AH) = ODH 

(DX) = row number 
(CX) = column number 


Output: 
(AL) = the dot read 
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Write 
Teletype 


Current 
Video State 
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This routine is used by the “TYPE” command 
and other DOS commands to display data on 
the screen. 


Input: 

(AH) = OEH 

(AL) = character to write 

(BL) = foreground color in graphics mode 


Note 
Screen width is controlled by previous mode set. 


Input: 
(AH) = OFH 


Output: 

(AL) = current mode 

(AH) = number of character columns on screen 
(BH) = current active display page 


‘™ 
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Diskette Services 


Introduction 


Input 


Interrupt 13H is the BIOS routine for diskette 
services. There are six services provided by INT 
13H. 


(AH) = 0 Reset Diskette System 

(AH) = 1 Read status of diskette system into AL 
(AH) = 2 Read sectors into memory 

(AH) = 3 Write sectors from memory to diskette 
(AH) = 4 Verify the specified sectors 

(AH) = 5 Format a track 


Additional settings for read, write, verify, and 
format: 


(DL) = drive number (0 - 3 allowed, value 


checked) 

(DH) = head number (0 - 1 allowed, value not 
checked) 

(CH) = track number (0-39 allowed, value not 
checked) 


Additional settings for read, write, and verify: 


(CL) = sector number (1-9, value not checked) 
(AL) = number of sectors (max = 9, value not 
checked) 


ES:BX = address of buffer (not required for 
verify) For the format operation, ES:BX 
points to the collection of address fields 
for the track. There must be one of these 
fields for every sector on the track. Each 
field has four bytes: 


Offset 0 = track number 
1 = head number 
2 = sector number 
3 = number of bytes/ sector 
(00 = 128, 01 = 256, 02 = 512, 03 = 1024) 
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Output (AH) = Status of operation: 


01 bad command 

02 address mark not found 

03 write was requested on write-protected 
disk 

04 requested sector not found 

08 DMA overrun 

09 DMA transfer crossed a 64K boundary 

10 read data error detected by CRC 

20 diskette controller chip failed 

40 seek to desired track failed 

80 device timeout 


(CY) = 0 successful operation 
(CY) = 1 unsuccessful operation (AH has details) 


For read, write, and verify these registers are 
preserved: DS, BX, DX, CH, and CL. 


(AL) = number of sectors read; this value may 
be incorrect if a timeout occurred. 


NOTE 


If an error is reported by the diskette, reset the 
diskette, then retry the operation. On read opera- 
tions, no motor start delay is taken, so your code 
should retry three times to make sure that a read 
error is not caused by motor start-up. 
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Communications Services 


Introduction This set of routines performs serial, RS232C 


communications through the communications 
port. You should use a polling technique in your 
communications; this is not interrupt-driven 
I/O. All functions are accessed through BIOS 
interrupt 14H. 


Initialize the Input: 
Communica- (AH)=0 
tions Port (DX) = selection of RS-232 channel (0 or 1) 
(AL) = parameters for initialization in the 
following form: 

7 #6 5 4 3s 2 1 0 
—Baud Rate— —Parity— Stopbit —Word length— 
000 - 110 baud 00 - None 0-1 10 - 7 bits 
001 - 150 01 - Odd 1=2 11 - 8 bits 
010 - 300 11 - Even 
011 - 600 
100 - 1200 
101 - 2400 
110 - 4800 
111 - 9600 

Output: 


Condition is set according to the same conven- 
tions as in “Get Comm Port Status” (see below). 
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Send 
Character 


Receive 
Character 
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Input: 

(AH) =1 

(DX) = RS232 channel to be used (0 or 1) 
(AL) = the character to be sent. 


Output: 

(AL) is preserved. 

(AH) — if the operation was unsuccessful, bit 7 
is set. The other bits in (AH) are set as 
they are in “Get Comm Port Status” if 
the operation was successful. 


Input: 
(AH) = 2 
(DX) = RS232 channel to be used (0 or 1) 


Output: 

(AL) = the received character. 

(AH) = status of operation, if (AH) = 0, the oper- 
ation was successful. If the high order bit 
of (AH) is set, a timeout error aborted the 
operation and the rest of (AH) can be 
ignored. Any other setting of (AH) indi- 
cates errors in the receive character 
operation. 


r~ 


Get Comm 
Port Status 
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Input: 
(AH) =3 
(DX) = RS232 channel to be used (0 or 1) 


Output 
(AX) = status: 
(AH) = line control status 
bit 7 = timeout 
bit 6 = transmission shift reg. empty 
bit 5 = transmission holding reg. empty 
bit 4 = break detect 
bit 3 = framing error 
bit 2 = parity error 
bit 1 = overrun error 
bit 0 = data ready 
(AL) = modem status 
bit 7 = received line signal detect 
bit 6 = ringing detect 
bit 5 = data set ready 
bit 4 = clear to send 
bit 3 = delta receive line signal detect 
bit 2 = trailing edge ring detected 
bit 1 = delta data set ready 
bit 0 = delta clear to send 


ROM BIOS 


Service 
Routines 
Keyboard Handling 
Introduction Interrupt 16H provides the keyboard handling WwW 


functions through three sub-functions. Most 
keys return two values: a scan code and a char- 
acter code. The scan code is the same as the key 
number (see diagram below), and the character 
code is the ASCII superset interpretation of the 
key (including coincident SHIFTs or CTRLs). 
Check the section on “DOS Interrupts and Func- 
tion Calls” to select either the BIOS keyboard 
routines or the DOS routines. 


lle] lalla Dt 

[l=] oe i 
[= [1 Seo wr Flee 
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CHARACTER CODES 

ASCII Value Control ASCII Value 

Decimal Hex Character Character Decimal Hex Character 

000 00 (null) NUL 032 20 (space) 

001 01 &) SOH 033 21 ! 

002 02 es STX 034 22 : 

003 03 v ETX 035 23 a 

004 04 4 KOT 036 24 $ 

005 05 & ENQ 037 25 % 

006 06 3 ACK 038 26 & 

007 07 (beep) BEL 039 27 , 

008 08 & BS 040 28 ( 

009 09 (tab) HT 041 29 ) 

010 0A (line feed) LF 042 2A - 

011 OB (home) VT 043 2B - 

012 OC (form feed) FF 044 20 ; 

013 OD (carriage CR 045 2D . 
return) 

014 OE ae SO 046 2E 

015 OF xy SI 047 2F j 

016 10 > DLE 048 30 0 

017 11 =< Dol 049 ol 1 

018 12 t DC2 050 32 2 

019 13 I" DC3 051 30 3 

020 14 T DC4 052 34 4 

021 15 § NAK 053 35 5 

022 16 — SYN 054 36 6 

023 17 + ETB 055 37.7 

024 18 4 CAN 056 38 8 

025 19 1 EM 057 39 9 

026 1A — SUB 058 3A 

027 1B = ESC 059 3B : 

028 1C (cursor FS 060 aC a 
right) 

029 1D (cursor left) GS 061 3D = 

030 1E (cursor up) RS 062 3H ? 

031 1F (cursor US 063 oF ? 
down) 
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CHARACTER CODES (Cont’d) 


ASCII Value Control ASCII Value 
Decimal Hex Character Character Decimal Hex Character 
064 40 @ 096 60 © 
065 4] A 097 61 a 
066 42 B 098 62 b 
067 43 C 099 63 Cc 
068 44 D 100 64 d 
069 45 E 101 65 e 
070 46 F 102 66 f 
071 47 G 103 67 g 
072 48 H 104 68 h 
073 49 I 105 69 i 
074 4A J 106 6A j 
075 4B K 107 6B k 
076 4C L 108 6C ] 
077 41) M 109 6D m 
078 4k N 110 6E n 
079 4k O 111 6F ) 
080 50 a 112 70 p 
081 il Q 113 71 q 
082 52 R 114 ie r 
083 Do S 115 13 S 
084 54 dl 116 74 t 
085 DD U 117 19 u 
086 56 V 118 76 V 
087 57 WwW 119 TT Ww 
088 58 X 120 78 x 
089 59 7 121 79 y 
090 5A Z 122 7A Z 
091 5B [ 123 7B { 
092 BU \ 124 1 
093 5D ] 125 7D } 
094 5E A 126 TE ~ 
095 5F — i177 TF ie 
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CHARACTER CODES (Cont’d) 


ASCII Value ASCII Value 
Decimal Hex Character Decimal Hex Character 
128 80 C 160 AO a 
129 81 u 161 Al i 
130 82 é 162 A2 ) 
131 83 a 163 A3 u 
132 84 a 164 A4 n 
133 85 a 165 A5 N 
134 86 a 166 A6 a 
136 87 Cc 167 A7 O 
136 88 é 168 A8& é 
137 89 e 169 A9 — 
138 8A e 170 AA “1 
139 8B 1 Ll AB % 
140 8C 7 172 AC "4 
141 8D 1 173 AD | 
142 8E A 174 AE « 
143 8F A 175 AF » 
144 90 E 176 BO et 
145 91 . 2 Lv? Bl ese 
146 92 A 178 B2 BRE: 
147 93 0 179 B3 | 
148 94 fe) 180 B4 4 
149 95 0 181 B5 + 
150 96 t 182 B6 za 
151 97 u 183 B7 o 
152 98 y 184 B8& “ 
Loo 99 O 185 B9 =I 
154 9A U 186 BA I 
155 9B ¢ 187 BB = 
156 9C : 188 BC = 
157 9D 3 189 BD Ss 
158 9K Ft 190 BE = 
159 OF 191 BF a 
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CHARACTER CODES (Cont’d) WwW 
ASCII Value ASCII Value 

Decimal Hex Character Decimal Hex Character 
192 CO L 224 EO a 

193 Ci a 925 El B 

194 C2 + 226 E2 ' 

195 C3 F 927 E3 1 

196 C4 — 228 E4 . 

197 C5 + 229 E5 o 

198 C6 F 230 E6 U 

199 CF Ir 231 Ey T 

200 C8 r 932 E8 © 

201 C9 ir 233 E9 © 

202 CA ae 234 EA Q 

203 CB a 235 EB 6 

204 o8 It 236 EC P 

205 CD = 937 ED a 
206 CE ate 238 EE f 

207 CF aa 239 EF a 

208 DO 240 FO = 

209 D1 =F 241 F1 ~ 

210 D2 + 242 F2 = 

211 D3 i 243 F3 = 

212 D4 k 244 F4 ¢ 

213 D5 & 245 F5 J 

214 D6 - 246 F6 Es 

15 D7 + 247 F7 ~ 

216 D8 7 248 F8 ° 

517 D9 4 249 F9 + 

218 DA r 250 FA ‘ 

219 DB # 951 FB JS 

220 DC aad 252 FC n 

221 DD ] 253 FD 2 

222 DE | 254 FE * 

220 DF ‘at 255 FF (blank) \ | 
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Ne 


Read Next 
ASCII 
Character 


Check if 
Keystroke 
Available 


yf 


Input: 
(AH) =0 


Output: 
(AL) = character code 
(AH) = scan code 


Note 


This routine will not return execution to the call- 
ing program until it has a keystroke to report. 


This routine is used to check to see if a keystroke 
has been entered. Use this function if you want 
to continue processing whether or not a key has 
been pressed. 


Input: 
(AH) =1 


Output: 

Z flag = 1 — no code available 

Z flag = 0 — code is available 

If a character is available, it is stored in AX in 
the same format as for the “Read Next ASCII 
Character” call. However, the code also remains 
in the keyboard buffer, so that a “Read Next 
ASCII Character” call returns this character’s 
code value again. 
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Get Current Input: 
Shift Status (AH)=2 


Output: 


(AL) = current shift status 


Shift States 


oe 
o 


Subject matter 


Insert 
Caps-Lock 
Num-Lock 
Scroll-Lock 

Alt shift 

Ctrl shift 
left-hand shift 
right-hand shift 


OrRNMNW er OOD 4] 
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Meaning, when bit is 1 


state active 
state active 
state active 
state active 
key depressed 
key depressed 
key depressed 
key depressed 
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Printer Routines 


Printa 
Character 


Initialize 
Printer Port 


Get Printer 
Status 


This set of BIOS routines communicates with 
the printer through interrupt 17H. 


Input: 

(AH) =0 

(AL) = the character to be printed 
(DX) = printer port number (0-3) 


Output: 

(AH) = 1 if character not printed due to timeout. 
Otherwise, bits are set as they are in 
“Get Printer Status” call. 


Input: 
(AH) = 1 
(DX) = printer port number (0-3) 


Output: 
(AH) = printer status (see below) 


Input: 
(AH) = 2 
(DX) = printer port number (0-3) 


Output: 
Bit Meaning if Set (equal to 1) 


not busy 

acknowledge 

out of paper 

selected 

I/O error 

not used 

not used 

timeout (set by software) 


OoOrnwmWw er OLD 4] 


If a printer is connected, 10H and 90H are 
healthy statuses. Otherwise 30H is healthy. 
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Miscellaneous ROM BIOS Services 
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System 
Reset 


Print 
Screen 
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If you issue issue interrupt 19H, the system 
bootstraps itself in much the same way as it 
does with the Ctrl-Alt-Delete key sequence. The 
only difference is that Ctrl-Alt-Delete causes 
diagnostics to be run, whereas Interrupt 19H 
causes an immediate system load. 


To obtain a printed copy of what is on the 
screen, issue a request for interrupt 5H. This 
produces exactly the same result as pressing the 
shift and PrtSc keys. This routine works in 
either text or graphics modes. Unrecognizable 
characters are printed as blanks. 


c™ 


Equipment 


List 


Determine 
Memory 


Size 
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You can use this routine to obtain a list of the 
optional equipment attached to your system. 
Simply issue an interrupt 11H; no register set-up 
is necessary. Output (starting with the most sig- 
nificant bit of (AX)) is as follows: 


Bit Meaning 
AH 7-6 number of printer adapters (0-3) 
5 not used 
4 game adapter attached, or not 
3-1 number of communications 
adapters (0-7) 
0 not used 
AL 7-6 number of diskette drives minus 1, 
if bit 0 is set. 
5-4 starting video mode: 
01 — graphics card display,40 
columns,b/w 
10 — graphics card 
display,80 columns,b/w 
11 —monochrome card display 
3-2 amount of memory on system 
board: 
00 — 16KB Base 
01 — 382KB Base 
10 — 48KB Base 
11 — 64KB Base 
1 not used 
0 diskettes are attached; refer to 
bits 7 and 6. 


Interrupt 12H gives the total amount of memory 
in the address space, up to a megabyte. No regis- 
ter set-up is required. The BIOS reads the 
switches on the system board and adds the 
amount of memory on a memory expansion 
board and returns the total in (AX). The amount 
of memory is expressed as the number of 1K 
blocks. 
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Bypassing the BIOS 


This section explains how you can either replace 
one of the BIOS service routines with a program 
of your own or add a “front-end” so that you per- 
form some preprocessing immediately prior to 
using a particular BIOS routine. 


When the system is powered on, low memory is 
initialized with the addresses of all of the BIOS 
interrupt routines. To replace a BIOS routine, 
change the address in the interrupt table to the 
address of the code which you want to execute in 
place of the BIOS code. To perform preprocess- 
ing before handing execution on to the BIOS 
code: 


1 replace the address of the BIOS routine with the 
address of your program 


2. transfer execution to the BIOS routine at the end 
of your program. 


Be sure to use the “Set Vector’ system call 
(Function Request 25H) to replace the BIOS rou- 
tine addresses instead of writing directly to low 
memory. 
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CONFIG.SYS 


Break 


The special file CONFIG.SYS is processed 
automatically when DOS starts. As with the 
batch file AUTOEXEC.BAT, this processing is 
automatic. DOS will simply look at the root 
directory to see if the file is there. 


CONFIG.SYS is a text file that can be edited by 
EDLIN or any other text editor that produces 
ASCII files. Five commands can be used in the 
CONFIG.SYS file. Each command changes a 
system parameter. 


BREAK ON/OFF 
Changes the way DOS checks for a 
CTRL/BREAK 


BUFFERS=xx 
Sets the number of data buffers that DOS uses. 


DEVICE=[d:] [path] filename [.ext] 
Adds a nonstandard device driver to DOS. 


FILES=xx 
Sets the number of files that can use ASCIIZ 
strings. 


SHELL=[d:] [path] filename [.ext] [d:] [path] /P 
Specifies an alternate command processor. 


Normally, DOS checks for a CTRL/BREAK 
only when it is doing input or output. Some pro- 
grams do very little Gf any) input or output for 
long periods of time. The BREAK ON command 
sets DOS to check for a CTRL/BREAK when 
any DOS function is called. 
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BREAK OFF resets the default so that DOS 
only checks for a CTRL/BREAK during input 
and output. This command can be used to over- 
ride a BREAK ON that was set by CONFIG.- 
SYS. 


Buffers The number of buffers has an effect on both the 
speed of disk I/O and available memory. A 
larger number of buffers allocates more memory 
to the system for operations. This is highly 
desirable for systems with large amounts of 
RAM that will be used for database applica- 
tions. It is highly undesirable for systems with 
minimal RAM that do little work with disk files. 


The system default is BUFFERS=2, which is 
adequate for most purposes and requires only 1K 
of RAM. If your system will be doing a signifi- 
cant amount of data handling, especially on a 
hard disk, BUFFERS=4 would improve access 
times at a cost of only 1K of internal memory. 


Device When DOS is first started, it loads all of the 
standard device drivers for the keyboard, screen 
and so on. If your system requires a special 
device driver, this command tells DOS where to 
find it. The device driver will then be loaded as 
an extension to DOS. 


Device drivers are .COM files with a specific 
structure described in Chapter 9. The command 
DEVICE=ANSLSYS causes DOS to replace the 
standard display and keyboard device drivers 
with the extended screen and keyboard support 
that the extended functions require. 


ROM BIOS 
Service 
Routines 


Files 


Shell 


If you wish to load several special device drivers, 
you must use a DEVICE command for each one. 


Opening a file with an ASCIIZ string eliminates 
the traditional direct handling of a File Control 
Block (FCB). DOS will handle all these things 
for you by creating and maintaining FCBs 
internally. To do this, it needs memory. Each file 
requires 39 bytes of memory. 


The FILES command sets aside memory for this 
operation. The default is FILES=8. The max1- 
mum is FILES=99. This is the limit for the 
entire system. A particular process (or program) 
can still have only 20 files open at once. 


The COMMAND.COM file that DOS uses as its 
“front end” processor can be replaced by another 
command processor. The SHELL command spec- 
ifies the file to be used and the default path for 
processing commands. The command processor 
must be able to read and execute commands, 

and handle interrupts 22H, 23H, and 24H. 


Since COMMAND.COM handles internal com- 
mands, .BAT file execution, and .EXE file load- 
ing, these functions will be unavailable unless 
the new command processor duplicates them. 
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;BOOT ROM - AT&T PERSONAL COMPUTER 6300 
;Rev. 1.0 - MAY 1984 


page 60,132 


Filerame: flags.sre 


> 

; This file contains the temporary conditional assembly flag 
: definitions and includes of the other assembly modules. 

’ 


; MASM does not let you code a “jump intersegment direct' instruction, so 
; this macro simulates that instruction. 


jupf macro argl,arg2 33 USAGE: jmupf seg, off 
db OEAh 
dw arg2 
dw arg 
endm 


0000 code segment public 'ROM' ; link code segments first 
assume cs:code, ds:nothing, es:nothing, ss:nothing 

c000 ORG o0co00h 

co00 flags _data1 proc 

co00 00 chk_lo db 0 ; Space for checksum of F0O00:C000 to FO0O0O:DFFF 

C001 OO rom_id db 0 ; ROM identifier. 

C002 E2CE R rom_mt dw mastab ; offset of mastab in ROM. 

coo4 flags_datal1 endp 

C004 far_calls proc far ; far call table: the user does a far call to 
; FOOO:COXX, a near call is done to the proper 
; routine, anda far return back to the user, 

COO4 E8 E602 R eall DString ; FOO00:COO4 (3 bytes per near call) 

COOT CB ret ‘ (1 byte per far’ return) 

C008 E8 E619 R call DCrLf ; FO00:C008 

COOB CB ret 

COOC E8 E626 R eall DColon 3 FOOO:COOC 

COOF CB ret 

C010 E8 E632 R eall DHexLong ; FO000:C010 

C013 CB ret 

CO14 E8 E63C R eall DHexWord ; FO00:C0O14 

C017 CB ret 

C018 E8 E643 R eall DHexByte ; F000:C018 

CO1B- CB ret 

CO1C E8 E650 R call DHexNib 3; FO00:CO1C 

CO1F CB ret 

C020 E8 E665 R eall DNum ; FO000:C020 

C023 CB ret 

co24 EB E66D R call DNumW ; FOOO:cO24 

C027 CB ret 

C028 E8 E5E5 R eall rom_checksum ; FO000:C028 

CO2B- CB ret 

CO2C E8 E1F6 R eall rtec_chk ; FO000:C02C 

CO2F CB ret 

C030 E8 E266 R call memtst 3 FO00:C030 

C033 CB ret 

CO34 £§E8 CFOF R eall h_init 3 FO000:C034 

CO37 CB ret 

C038 E8 D640 R eall h_fmt ; FO000:C038 

CO3B CB ret 

CO3C DB8C R dw offset banner_m ; pointer to banner 

CO3E 0000 dw 0 ; For aligning the copyright message. 

CO4O 43 4F 50 59 52 49 db "COPYRIGHT (C) Ms 


47 48 54 20 28 43 
29 20 20 20 
CO50 4F 4c 49 56 45 54 db 'OLIVETTI 1984 , 
54 49 20 31 39 38 
34 20 20 20 


c060 far_calls endp 


C060 code ends 


H Includes of Assembly Modules 


;include flags.asm (this module) 
C include sysdata.asm 
c 
Cc pS SS SSS SSS SSS SSS SSS SSSSSSSSSSSS SSS SS SSS SS SST ST Ss SSS rr Serr Ssssssssssssss 
C 43 Filename: sysdata.sre 
C 4 
Cc H This is the port equate and system data definition module, 
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ROM BIOS 


Listing 


Sg A AA IPI OT SE SL ETE LESSEE IS LD SELES ODP ESE ETRE LEIS TLE ELSE EEL ETE EELS EES LEE LOL 


0000 
0030 
0040 
BOOO 
B800 
F000 


0007 
0008 
000D 
OOOA 


0000 


0000 
0001 
0002 
0003 
0004 
0005 
0006 
0007 


0008 
0008 
0009 
000A 
QOO0B 
000C 
000D 
000D 
O00E 
OO0F 


0080 
0082 
0081 
0083 


0004 
0000 


= 0058 
= 0041 
= 0056 


= 0043 


= 0000 


Ccec 
0021 


= 0013 


SHAKER RE HERG AAGAERS OEHGE SOK SH MOSEHEKON HE SSHEKOEHES OO EEGGHSE SHAG HHAAOAAESOHSAOHOG SSS AOAEDOEOG ON SaS ATA owe 


i (See flags.sre for conditional assembly flags. ss.) 


absO_seg equ 00000h 
stack_seg equ 00030h 
data_seg equ 00040h 
para_mono equ OBOOOh 
para_graph equ OB800h 
code_seg equ OFOOOh 
BEL equ 007h 
BS equ 008h 
CR equ 00Dh 
LF equ OOAh 
NUL equ 0 


dma_addr_0O equ 00h ; 16-bit address register - channel 0 - refresh 
dma_count_0 equ Oth ; 16-bit count register 

dma_addr_1 equ 02h ; 16-bit address register - channel 1 - not used 
dma_count_1 equ O3h ; 16-bit count register 

dma_addr_2 equ O4h ; 16-bit address register - channel 2 - FDU 
dma_count_2 equ 05h ; 16-bit count register 

dma_addr_3 equ 06h ; 16-bit address register - channel 3 - display 
dma_count_3 equ O7h ; 16-bit count register 

dma_status equ 08h ; 86-bit read status register 

dma_command equ 08h ; 68-bit write command register 

dma_request equ 09h ; 4-bit write request register 

dma_mask_bit equ OAh ; 44-bit (write) set/clear one mask register bit 
dma_mode equ OBh ; 6-bit write mode register 

dma_ff_clr equ OCh ; (write) clear byte pointer flip/flop 
dma_temp equ ODh ; 68-bit read temporary register 

dma_master_clr equ ODh ; (write) master clear command 
dma_mask_clr equ OEh ; 44-bit (write) clear all mask register bits 
dma_mask_write equ OFh ; 4-bit write all mask register bits at once 
dma_segm_0 equ 080h ; RAM refresh - 4x4-bit high nibble segment port 
dma_segm_1 equ 082h ; not used 

dma_segm_2 equ 08th ; FDU 

dma_segm_3 equ 083h ; display TEMP 


wee ee eee wm me mmm ewe eee meee eee eee ew ew ewe we me Be ewww ee em ee eee ee ee eee eee 


bit #0: memory-to-memory/~I/0 enable 
bit #2: controller disable 

bit #3: compressed/~normal timing 
rotating/“fixed priority 

bit #5: extended/“late write selection 
bit #6: DREQ active low/~high 

bit #7: DACK active high/“~low 


; dma_command port: 


o 
» 
a 
* 
P -4 


dma_emd_disable equ O004h ; controller disable (bit #2) command 
dma_emd_enable equ 000h ; memory-to-I/0, controller enable,normal 
; fixed priority, late write, DREQ/~DACK 


dma_mode_0O equ 058h ; ehannel 0, read, autoinitialize, inc- 
; rement, single mode for RAM refresh. 
dma_mode_1 equ O41h ; channel 1, verify, autoinit disabled, 
; inerement, single mode for not used. 
dma_mode_2 equ 056h ; channel 2, write, autoinitialize, inc- 
; rement, single mode for FDU. 
dma_mode_3 equ O43h ; channel 3, verify, autoinit disabled, 
; inerement, single mode for display. 
; dma_mask_bit port: ; bits #0-1: channel select 
; bit # 2: set/~clr mask bit (off/~on) 
dma_unmask_0 equ 000h ; turn on channel O for RAM refresh. 


pic_0 €qu 020h ; 8259A ‘control' port (AO = 0) 

pic_1 equ 021th ; 8259A ‘data!’ port (AO = 1) 

; See So SAO O © 6 SK SSS OSS SS FF HOSS OC SKS SSBOSS SVS OQS SSO es eee ce ee 2a SQ Sa eee 2 'e 

; i8259A Programmable Interrupt Controller Commands 

; eae eS SOO ee Sea Bases eess ec eceoeaen aneeesezeernwaveeroeoeea cere e222 2220°222 

pic_icw1 equ 013h ; ICW1 for both master & slave pic's 
; bit #0 = 1: ICW4 to follow (w/vector base) 
; bit #1 = 1: single mode (no slaves or icw3) 


ROM BIOS 
Listing 


0008 
0008 


= 000D 


oon mo 


OOFF 
0020 
0060 


0061 
0066 


0040 
0041 
0042 
0043 


0036 
0074 
00B6 


0000 


0013 


0266 


0050 
0052 


0060 
0061 


0064 


0062 
0065 
0066 


c 
c 
c 
Cc 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
Cc. 
c 
c 
Cc 
c 
c 
c 
Cc 
c 
c 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
Cc 
c 
Cc 
C 
C 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
c 
C 
Cc 
Cc 
c 
c 
Cc 
C 
Cc 


nnn ncn nnn err SSS! SSS SSS SSD 


bit #2 = 0: call address interval of 8 bytes 
(don't care if 8086 mode -- always vectors 4 
byte interval) 

bit #3 = 0: edge triggered 


; 

; 

; 

; 
pic_icw2 equ 008h ; interrupt vector base address (INTs 08h - OFh) 
pic_icw3 equ 008h ; if cascade mode , and IR3 is a 

3. Slave, 8259A is reprogrammed including icw3 
pic_icw4 equ 00Dh ; bit #0 = 1: 8086 mode 

; bit #1 = 0: normal end_of_int 

; bit #2 = 1: specify master for buffered mode 

; ( specifies slave for buffered mode ) 

; bit #3 = 1: buffered mode 

; bit #4 = 0: not special fully nested 
pic_off_msk equ OFFh ; pic interrupt mask bits (all interrupts off) 
pic_neoi equ 020h + non-specific end-of-interrupt 
pic_seoi_0 equ 060h specific end-of-interrupt for IRO: 18253 p_timer 


H 
pic_seoi_1 equ 061th 3 Specific end-of-interrupt for IRO: 1804%1A kb 
pic_seoi_6 equ 066h ; Specific end-of-interrupt for IR6: fdu 


. 18253 p_timer Port Addresses 


p_8253_0 equ O40h ; 8253 p_timer 0 - rte interrupt - IRO = INT 08h 
p_8253_1 equ O41b ; 8253 p_timer 1 - memory refresh p_dma 

p_8253_2 equ O42h ; 8253 p_timer 2 - tone generator for speaker 
p_8253_ctrl equ O43h ; 8253 p_timer control port 


; 18253 p_timer Control Bytes 


; bit #0 -> Binary Code Decimal (BCD) Enable 

5 bits #1-3 -> Mode (0-5) 000 Mode 0: Interrupt on Terminal Count 

; 001 Mode 1: Programmable One-Shot 

: x10 Mode 2: Rate Generator 

7 x11 Mode 3: Square Wave Rate Generator 

H 100 Mode 4: Software Triggered Strobe 

: 101 Mode 5: Hardware Triggered Strobe 

; bits #4-5 -> Read/Load Instruction (0-3) 

; bits #6-7 -> Select Counter (0-2) 

tOcmd equ 036h ; 00 11 011 0 => p_8253_0, 1lsb 1st, mode 3, no BCD 
tiemd equ O74h + 01 11 010 0 => p_8253_1, 1lsb 1st, mode 2, no BCD 
t2cemd equ OB6h + 10 11 011 0 => p_8253_2, 1lsb 1st, mode 3, no BCD 


; 18253 p_timer Counts 


; 8253 input is 1.2288 MHz (3.6864/3) or a period of 813.8 nsec = 0.814 usec 


; Note: PC input is 1.19318 MHz or a period of 838.1 nsec = 0.838 usec 
tOcount equ ) > = 65,536 => (1,228,800 Hz)/(65,536) = 18.75 ints/seo 
; -> (1,193,180 Hz)/(65,536) = 18.21 ints/seo 
;tlcount equ 9 ; OLD refresh cycle = 9#(813.8 nsec) = 7.32 usec 
ticount equ 19 ; REAL refresh cycle = 19#(813.8 nsec) = 15.5 usec 


; < 15.625 usec minimum required. ( is 18 = safety?7) 


t2count equ 614 ; (1.2288 MHz)/(2#614%) 2 1.00 kHz tone 


28530 Serial Communication Controller 


(sce_data_x port addresses are indexed from the sco_ctl_x 


port addresses. See com.src.) 
ShcA cea code acniciaecccwaadoceecawecons en ckwaaeccnmnae eacccosance 
sce_ctl_a equ 050h ; write to SCC pointer register (0-Fh), 
sec_ctl_b equ O52h ; then read or write from selected register. 


p_kscan equ 060h 
p_ketrl equ O061h * biG #7% reset interrupt pending 
; bit #6: kb clock reset 
; bit #5: I/0 channel (NMI) enable 
: bLE “Ns RAM parity (NMI) enable 
; bits #3 & #2: not used 
> bit #1: speaker data 
; bit #0: speaker gate to p_8253_2 
kb_status equ 064h ; bit #4 input buffer (ok to write byte) 
; bit #0: output buffer (byte to be read) 
H OOS OO OS OS OS SS SST SSS SHOSSSSSSSSHSBSSTSHSSBSB FB eS eSB eeeeeeenenacaaseonaen 
H General Control Ports 
ControlB equ 062h ; 8087, etc. 
CommControl equ 065h 
sys_conf_a equ 066h ; bit #7: 2764/72732 ROM's 
° bit #6: not used 
* bit #5: SCC 8530 chip installed 
; bit #4: 8087 installed 


ROM BIOS 
Listing 


PST SS EE SE, FL a 


= 0067 


0080 
0040 
0020 
0010 
0009 
0008 
0004 
0003 
0002 
0001 


= 0201 


= 03BC 


= 0378 


= 0278 


03D4 


03B4 


= 03F8 


= O3FA 


= 02F8 


= O2FA 


bit #3: 256k x 1 RAM used 
bits #2 - #0: RAM configuration 


’ 
’ 
sys_conf_b equ 067h ; bits #7 - #6: (number of FDUs)-1 
; bits #5 - #4: reserved for monitor ty pe 
; bits #3 - #2: reserved for HDU type 
3; bit #1: "fast" FDU start up 
; bits #0: 96 tpi FDU 
; Scnrice RAD OOO SKK SSS SSS MaKe cen Sam eRe SKS RSS e memes ess" 
R 58174A Clock Calendar 
; 
; (See calendar.src) 
; JSS AK MAAS AA KS RSS Same lem aS Kee KS SSS See See Se SSS 
; ns ck mi i | tent a an nw gs i igs "a> ca, sino aa ce ee ee So ow [OSS Oe SS eR P'S 
; FDU & HDU Disk Driver Error Codes 
; SIAC Sa ahs aa aa Aha cS Oa Sena ne SaaS SS Heese aineSeSSn -——<—=— 
time_out equ 80h 
seek_error equ 40h 
fde_error equ 20h 
erc_error equ 10h 
dma_seg_error equ 09h 
dma_error equ 08h 
sect_not_found equ O4h 
write_protect equ 03h 
addr_mark_error equ 02h 
emd_error equ O1n 
; wees reese eee wee w meee ew eee ew ee ew eee eee meee ew ewe eee ee ere eer oeceecocrerere2eee" 
; Game Card 
; BAe SSDS SD Se DOORS Onn SSe Sees eS esa eee ea Sea Se Se eee esenecrs—= 
game_card equ 201th 
4 eeeee eee eee mee em eee ee wwe eee wet eee eee me eet we we eee ee eee eee eee ereececeeere2ee2e2e" 
. Parallel Printer Interface 
H 
; (prt_stat_x & prt_emd_x port addresses are indexed from the 
A prt_data_x port addresses. See prt.src.) 
; Sec amr SOSH SS RRS Ma OSS Oe nee nanos eee see eee ee sso eee eenm am 
prt_data_a equ 03BCh 
; prt_stat_a equ 03BDh 
; prt_emd_a equ O03BEh 
prt_data_b equ 0378h ; on mother board 
; prt_stat_b equ 0379h 
; prt_emd_b equ O37Ah 
prt_data_e equ 0278h 
; prt_stat_e equ 0279h 
* prt. cmd_o equ O27Ah 
; ese sew em ew ee ees ew ew eee em mew eee ee ewe eee ee eee ee eee eeeswwe ere eceee2rcesee2e2e22e 
. Color and Monochrome Video Controller 
; 
; (xxxxx_data, xxxxx_mode, xxxxx_status, xxxxx_LPclear, and 
; xxxxx_LPPreset port addresses are indexed from the xxxxx_Pointer 
; port addresses for color & display. See vid.sre and graph.src. ) 
; cement nan nee ee BD OS BOS SS SSS SSS SS Sessa se eeree eee eee Se eeeeeceececeneeaee 
; Color Controller. 
color_pointer equ O3D4h ; 6845 pointer to internal regs 
; Monochrome Controller. 
v_pointer equ O3B4h ; 6845 pointer to internal regs 
; ——_we eee Ke pom wmer ee em eww ee we ee eee ewe eB Ow ew Ow ewe em ew ew ew eee ewww rer rrrrererererererererereree 
: INS8250 Asynchronous Communication Chip 
, 
: (com_int_x, com_letl_x, com_mctl_x, com_l1stat_x, and 
; com_mstat_x port addresses are indexed from the com_data_x 
; port addresses. See com.src.) 
} See Ro Oe RP wae sa Dee Seana sno nae w erences ea eeew aon ee ee sees er ee ee neno 
com_data_a equ O3F8h ; channel A 8250 data register/low byte baud 
; com_int_a equ O3F9h ; channel A 8250 high byte baud count register 
com_id_a equ O3FAh ; channel A 8250 check for presence register 
; com_letl_a equ 03FBh ; channel A 8250 line control register 
; com_mctl_a equ 03FCh ; channel A 8250 modem control register 
; com_lstat_a equ O3FDh ; channel A 8250 line status register 
; com_mstat_a equ O03FEh ; channel A 8250 modem status register 
com_data_b equ O2F8h ; channel B 8250 data register/low byte baud 
; com_int_b equ O2F9h ; channel B 8250 high byte baud count register 
com_id_b equ O2FAh ; channel B 8250 check for presence register 
; com_letl_b equ O2FBh ; channel B 8250 line control register 
; com_mctl_b equ O2FCh ; channel B 8250 modem control register 
; ecem_lstat_b equ O2FDh ; channel B 8250 line status register 
; com_mstat_b equ O2FEh ; channel B 8250 modem status register 


+... shift flag equates within kb_flag 
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ROM BIOS 
Listing 


= 0080 insert_mode equ 80h ; insert state in action 
= 0040 caps_lock_mode equ 40h ; caps lock state toggled 
= 0020 num_lock_mode equ 20h ; num lock state toggled 
= 0010 scrl_lock_mode equ 10h ; scroll lock state toggled 
= 0008 pause_mode equ 08h } pause toggled 
= 0001 dlx_kb equ Oth ; deluxe keyboard 
jeoro- shift flag equates within kb_flag_1 
= 0080 insert_shift equ 80h ; insert key depressed 
= 0040 caps_lock_shift equ 40h ; Caps lock key depressed 
= 0020 num_lock_shift equ 20h > num lock key depressed 
= 0010 scrl_lock_shift equ 10h ; scroll lock key depressed 
= 0008 alt_shift equ 08h ; alternate shift key depressed 
= 0004 entrl_shift equ O4nh ; control shift key depressed 
= 0002 left_shift equ O2h ; left shift key depressed 
= 0001 right_shift equ O1h ; right shift key depressed 
jrooc- Scan codes for special function keys 
= 001D cntrl_key equ 29 ; control key scan code 
= 002A left_shift_key equ 42 ; left shift scan code 
= 0036 right_shift_key equ 54 ; right shift scan code 
= 0038 alt_key equ 56 ; alt shift key scan code 
= OO3A caps_lock_key equ 58 ; shift lock scan code 
= OO4S num_lock_key equ 69 ; nmumber lock scan code 
= 0046 scrl_lock_key equ 70 ; scroll lock key scan code 
= 0052 insert_key equ 82 ; insert key scan code 
= 0053 delete_key equ 83 ; delete key scan code 


wer mm tm mm mm em mm ee me ee me ee ee ee ee ee em ee me em ee ew ee ee we ew ew we eee ee eee ee ee eee eee 
wm mm mm mm me mm mm em er mr er ee ee me me ee me em ee em em ee ee em ee we em ee ee wm ew ew ee ee ee eee eee 
wm mmm mm mm er ee mm me mm mm mm me ee ee eee ee ee ee ee ee em em ee em ee ee ee ee em ee ee ee ee ee ee ee ee ee 


; Interrupt Locations (dummy data segment to define constant offsets) 


0000 abs0 segment public 'RAM' ; at absO_seg 


assume cs:nothing, ds:nothing, es:nothing, ss:nothing 


0000 2777777? intOOlocn dd 2 ; divide by zero 
0004 72777777? intOllocn dd 4 ; Single step trap 
0008 77777727? intQ2loen dd ? ; mmi parity trap 
OOO BARRA intO3locn dd & ; break interrupt 
OOT0 BPIRBIIM? intO4locn dd ? ; divide overflow 
OO14 727772727? intO5locn dd ? > print screen 
0018 at cats Uy tS (ad intO6locn dd ? 

001C (ACR Aa A a aa intO7locn dd Ys 


were ere Rr re ee ee ee ee ee ee ee ee ee ee ee ee we we eee ee eee ee ee ee eee eee ew ew ewe 


0020 777772777 intOBlocn dd ? ; 18253 rte interrupt 
0024 277772277 intO09locn dd ? ; 18041 kb interrupt 
0028 277777777 intOAlocn dd ? 

002C 77777277 intOBlocn dd ? 

0030 2727277277277 intOClocn dd 2 

0034 7227772777 intODlocn dd ? ; hard disk interrupt 
0038 77777777 intOElocn dd ? ; floppy disk interrupt 


003C 772727227 intOFlocn dd ? 


OOK0 7727272727? inti0locn dd ? ; display request 

OO44 27777772 intijllocn dd ? ; equipment request 

0048 277777277 int1l2locn dd 2 ; memory size request 

OO4C 2777277277 int13locn dd ap ; disk I/O request 

0050 27777772? inti4locn dd ? ; serial communication request 

0054 2772272777 inti5locn dd ? ; cassette request 

0058 2777277272 int16locn dd ? ; kb request 

005C 272272727? int1i7locn dd % ; printer request 

0060 277777777 int18locn dd ? ; cassette BASIC pointer 

0064 277772777? int19locn dd ? ; boot-strap request 

0068 27777727 intlAlocn dd ? ; time of day request 

006C 277777227? int1Blocn dd ? ; kb break pointer 

0070 27777772? intiClocn dd ? > P_timer break pointer 

OOT4 777727772 intiDlocn dd ? ; display parameter pointer 

OO7T8 2272772777 int1Eloecn dd ? ; disk parameter pointer 

OO7C 777772777 intiFlocn dd z ; Braphics character extensions pointer 

0080 abs0O ends 
’ ww3nne eee nw we we we ew ew Or eee eee ee ewe ee eee ee ee ee ee ww ew ew we ew ewe Owe ee eee ewe wee ee eee ee 
H RAM stack 


Cc 
Cc 
c 
c 
C 
C 
c 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
c 
c 
Cc 
c 
c 
c 
c 
c 
c 
c 
c 
Cc 
c 
C 
Cc 
c 
Cc 
c 
Cc 
Cc 
c 
c 
c 
C 
Cc 
Cc 
c 
Cc 
c 
c 
€ 
C 
¢ 
Cc 
Cc 
C 
C 
Cc 
Cc 
C 
Cc 
Cc 
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Cc 
c 
Cc 
c 
Cc 
C 
c 
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c 
Cc 
c 
c 
c 
c 
c 
c 
Cc 
c 
Cc 
c 
c 
c 
c 
c 
c 
c 
c 
Cc 
c 
c 
c 
c 
c 
c 
c 
c 
c 
Cc 
c 
c 
c 
c 
c 
Cc 


ROM BIOS 


Listing 
0000 C stack_ram segment public 'RAM' ; at stack_seg 
C 
occo CC stack_ran ends 
C 
c Pt mn ne rr nen 
c ‘ System Data Area 
Cc J nn rr mn nner 
( 
0000 Cc data segment public 'RAM'! 3; at data_seg 
Cc assume cs:nothing, ds:nothing, es:nothing, ss:nothing 
Cc 
C. a a a a ea 
Cc H Data Area 
Cc I a I NI a a a a el 
Cc 
Cc ; ROM Bios Data Area 
Cc 
0000 O4 C rs232_addr dw 4 dup (?) ; 0040:0000 addresses of rs232 adapters 
2222 Cc 
Cc 
c 
0008 04 C printer_addr dw 4 dup (2?) ; 0040:0008 addresses of printers 
U222 c 
Cc 
Cc 
0010 ?27? C switch_bits dw ? ; 0040:0010 state of DIP switches 
0012 ?? C mfg tst db z ; 0040:0012 initialization flag 
0013 ??7? C memory_size dw v4 ; 0040:0013 memory size in kbytes 
0015 o2[ C mfg _err_flag db 2 dup (?) 3; 0040:0015 error codes for manufacturing 
2? c 
c 
Cc 
ie 
Cc : Keyboard Data Area 
Cc 
0017 ?2 C kb_flag db ? ; 0040:0017 keyboard shift flag status byte 
0018 ?7 C kb_flag_1 db ? ; 0040:0018 second byte of keyboard status 
0019 ?? C alt_input db ? ; 0040:0019 alternate keypad entry 
OO1A 2777 C »buffer_head dw ? 3; 0040:001A keyboard output pointer offset 
CO1C 227? C buffer_tail dw ? 3 0040:001C keyboard input pointer offset 
C 
OO1E 10 C kb_buffer dw 16 dup (7?) ; 0040:001E room for 15 entries: head = 
2222 Cc 
Cc 
Cc 
Cc ; tail implies buffer is empty 
Cc 
Cc 6 Floppy Diskette Data Area 
Cc 
O0O3E ?? C seek_status db ? ; 0040:003E floppy disk restore status bits 
OO3F 77 C motor_status db e ; 0040:003F floppy disk motor status bits 
0040 2? C motor_count db ? ; 0040:0040 floppy disk turn off counter 
0041 ?? C diskette_status db ? 3; 0040:0041 floppy disk driver status byte 
c 
0042 C emd_block label byte 3; 0040:0042 HDU command block buffer 
0042 C hd_error label byte ; 0040:0042 HDU sense byte buffer 
0042 07 C nec_status db 7 dup (7) ; 0040:0042 status bytes from NEC controller 
ee Cc 
Cc 
Cc 
Cc 
C : Video Display Data Area 
Cc 
c 
0049 22? C v_mode db ? ; 0040:0049 CRT mode 
OO4A 2777? C v_width dw vs 3; OO40:004A CRT number of columns (often db) 
OO4C 27727 C v_height dw ? ; 0040:004C CRT length of video ram in bytes 
OO4E 222? C v_itop dw ? ; OO40O:004E CRT video ram buffer address 
0050 08 [ C v_eurpos dw 8 dup (7?) ; 0040:0050 cursor for each of up to 8 pages 
CEGe c 
Cc 
Cc 
Cc 
0060 2277? C v_ceursize dw ? ; 0040:0060 v_curs_type sets cursor value 
0062 ?? C v_apage db ? ; 0040:0062 
0063 272??? C v_base6845 dw ? ; 0040:0063 
0065 ?? C v_3x8 db 4 ; 0040:0065 
0066 ?? C v_colorpal db ? ; 0040:0066 
Cc 
Cc ; Optional Post Data Area 
C 
0067 2??? C io_rom_init dw 2 ; 0040:0067 option ROM init routine offset 
0069 222? C io_rom_seg dw ? ; 0040:0069 option RON init routine segment 
006B ?? C intr_flag db 2 ; 0040:006B occurrence of interrupt flag 
Cc 
Cc ; p_timer Data Area 
c 
006C 777? C t_low_order dw ? ; 0040:006C low word of i8253 p_timer count 
OO6E 27777 C t_hi_order dw ? ; 0040:006E high word of i8253 p_timer count 
0070 ?? C t_overflow db ? 3; 0040:0070 time rolled over flag 
Cc 
Cc 5 System Data Area 
Cc 
0071 72 C bios_break db ? ; 0040:0071 bit #7 set if break key hit 
0072 7777 C reset_flag dw ? ; 0040:0072 = 1234h if keyboard reset hit 
¢ 
Cc 7 Fixed Disk Pata Area 
Cc 
OO7T4 7? C disk_status db ? ; 0040:0074 fixed disk driver status byte 
0075 7? Cc hf_num db ? 3; 0040:0075 fixed disk drive count 


8-42 


ROM BIOS 


Listing 
0076 ?? C control_byte db ? ; 0040:0076 fixed disk control byte options 
OO77 ?? C port_off db ? ; 0040:0077 fixed disk port offset 
Cc 
C $ Printer & RS-232 Time-Out Data Areas 
Cc 
0078 o4 [ C printer_t_out db 4 dup (?) ; 0040:0078 printer time-out variables 
22 Cc 
] Cc 
C 
007C o4 [ C serial_t_out db 4 dup (?) ; 0040:007C RS-~232 time-out variables 
22 Cc 
] Cc 
Cc 
C 
Cc (CS Additional Keyboard Data Area 
c 
0080 777? C buffer_start dw is ; 0040:0080 offset of kb_buffer = OO1E 
0082 7777 C buffer_end dw i ; 0040:0082 offset of kb_buffer_end = 003E 
Cc 
Co pre rere en nee eee nnn eee eee ee ee en nen 
G ¢ Data Area 
C {ASP SSCS SS eS e NeS SSS SSS SSMS Se Se Skee Re eee Re ee ee Ce Semen Seeee 
C 
C ; Master Table Pointer. 
Cc 
0084 2727727272 C master_tbl_ptr dd ? ; 0040:0084 pointer to master table 
Cc 
0088 C data ends 
C 
Cc J mmm mm we mm we ee we we ee ee ee ee eee ee eee eee 
c ; Video RAM 
Cc PPMP SASS SMe SSS SS See See SS ke Smee See eee Se cee see eee cee mee seen 
c | 
0000 C v_ram segment public 'RAM! ; at para_mono 
Cc 
0000 C v_ram ends 
c060 code segment public 'ROM! 
assume cs:code, ds:nothing, es:nothing, Sss:nothing 
C060 font_lo_8x16 label byte ; 2048 bytes 
C include fontloi6.asm 
Cc 
c060 C fontlo16 proce near 4 System Font Table for M24 
(¢ 
C060 00 00 00 00 00 00 c DB 00h,00h,00h,00h,00h,00h,00h, 00h 
00 00 (e 
C068 00 00 00 00 00 00 c DB 00h,00h,00h,00h, 00h, 00h, 00h, 00h ; 0 
00 00 Cc 
CO70 00 00 7E 81 AS 81 Cc DB 00h,00h,07eh,081h,0a5h,081h,081h, 0bdh 
81 BD ¢C 
cO78 99 81 7E 00 00 00 c DB 099h,081h,07eh,00h,00h,00h,00h,00h_ ; 1 
00 00 Cc 
C080 00 00 7E FF DB FF c DB 0O0h,00h,07eh,Offh,Odbh,Offh, Of fh, 0c3h 
FF C3 c 
C088 ET E7 FF 7E 00 00 c DB Oe7h,0e7h,Offh,07eh,00h,00h,00h,00h ; 2 
00 00 c 
C090 00 00 00 36 7F 7F Cc DB 00h,00h,00h,036h,07fh,07fh,O7fh,O7fh 
7F TF C 
C098 3E 1C 08 00 00 00 Cc DB 03eh,01ch,08h,00h,00h,00h,00h,00h ‘ 3 
00 00 C 
COAO 00 00 00 08 1C 3E Cc DB 00h,00h,00h,08h,01ch,03eh,07fh, 03eh 
TF 3E Cc 
COA8 1C 08 00 00 00 00 Cc DB 01ch,08h,00h,00h,00h,00h,00h, 00h ; 4 
00 00 Cc 
COBO 00 00 18 3C 3C ET C DB 00h,00h,018h,03ch,03ch, 0e7h, Oe7h, 0e7h 
E7 ET C 
COB8 18 18 3C 00 00 00 C DB 018h,018h,03ch,00h, 00h, 00h, 00h, 00h : 5 
00 00 c 
COCO 00 00 18 3C 7E FF Cc DB 00h,00h,018h,03ch,07eh, Of fh, Of fh, 07eh 
FF 7E ¢c 
coc8 18 18 3C 00 00 00 c DB 018h,018h,03ch,00h,00h,00h,00h,00h_ ; 6 
00 00 Cc 
CODO 00 00 00 00 00 18 c DB 00h,00h,00h,00h,00h,018h, 03ch,03ch 
3C 3C C 
COD8 18 00 00 00 00 00 C DB 018h,00h,00h,00h, 00h, 00h, 00h, 00h ; 7 
00 00 C 
COEO FF FF FF FF FF E7 Cc DB Offh,Offh,Offh,Offh,Offh,0e7h,0c3h,0c3h 
C3 C3 Cc 
COE8 C3 E7 FF FF FF FF Cc DB Oc3h,0e7h,Offh,Offh,Offh,Offh,Offh,Offh H 8 | 
FF FF c | 
COFO 00 00 00 00 3c 24 ( DB 00h,00h,00h,00h,03ch,024h,042h,042h 
42 42 Cc 
COF8 24 3C 00 00 00 00 Cc DB 024h,03ch,00h,00h,00h,00h,00h,00h ; 9 
00 00 c 
C100 FF FF FF FF C3 99 c DB oOffh,Offh,Offh,Offh,0c3h,099h, Obdh, Obdh 
BD BD C 
c108 BD 99 C3 FF FF FF Cc DB Obdh,099h,0c3h,0ffh,Offh,Offh,Offh,Offh ; a 
FF FF C 
C110 00 00 1F 07 OD 19 c DB 00h,00h,01fh,07h,0dh,019h,078h, Occh 
78 GC C 
C118 CC CC 78 00 00 00 fo) DB Occh,Occh,078h,00h,00h,00h,00h,00h ; b 
00 00 c 
C120 00 00 3c 66 66 66 C DB 00h, 00h, 03ch, 066h, 066h, 066h, 03ch,018h 
3C 18 C 
C128 7E 18 18 00 00 00 ¢ DB O7eh,018h,018h,00h,00h,00h,00h,00h_ ; ¢c 
00 00 Cc 
C130 00 00 18 14 12 12 Cc DB 00h,00h,018h,014h,012h,012h,012h,014h 
12 14 c 
C138 1070 FO FO 60 00 Cc DB 010h,070h,0f0h,0f0h,060h,00h,00h,00h : d 
00 00 Cc 


C__:lc eee rrr 
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C140 00 00 1F 11 
aoa 

C148 #13 37 77 T2 
00 00 

C150 00 00 18 18 
ET 3C 

C158 DB 18 18 00 
00 00 

C160 00 00 40 60 
TF 7C 

C168 70 60 40 00 
00 00 

C170 00 00 01 03 
TF 1F 

C178 O7 03 01 00 
00 00 

C180 00 00 18 3¢ 
18 18 

c188 7E 3C 18 00 
00 00 

C190 00 06 33 33 
33; 33 

c198 00 00 33 00 
00 00 

C1A0 00 00 7F DB 
7B 1B 

c1A8 1B 1B 1B 00 
00 00 

C1BO0 00 3E 63 30 
63 63 

C1B8 36 1C 06 63 
00 00 

cicoO 00 00 00 00 
00 00 

C1c8 7E 7E 7E 00 
00 00 

C1D0 00 00 18 3C 
18 18 

C1D8 7E 3C 18 FF 
00 00 

C1E0 00 00 18 3C 
18 18 

C1E8 18 18 18 00 
00 00 

CiFO 00 00 18 18 
18 18 

CiF8 TE 3C 18 00 
00 00 

C200 00 00 00 00 
TF 06 

c208 OC 00 00 00 
00 00 

C210 00 00 00 00 
TF 30 

c218 18 00 00 00 
00 00 

c220 00 00 00 00 
60 60 

C228 7F 7F 00 00 
00 00 

C230 00 00 00 00 
FF 42 

C238 24 00 00 00 
00 00 

C240 00 00 00 00 
00 18 

C248 3C 7E FF 00 
00 00 

C250 00 00 00 00 
TE 3C 

c258 18 00 00 00 
00 00 

C260 00 00 00 00 
00 00 

C268 00 00 00 00 
00 00 

C270 00 00 18 3C 
18 18 

C278 00 18 18 00 
00 00 

C280 00 00 66 66 
00 00 

c288 00 00 00 00 
00 00 

C290 00 00 36 36 
36 36 

C298 7F 36 36 00 
00 00 

C2A0 08 08 3E 63 
3E 03 

C2aA8 03 63 3E 08 
00 00 

C2B0 00 00 00 61 
oc 18 

C2B8 30 63 43 00 
00 00 

c2co0 00 00 1C 36 
3B 6E 

C2c8 66 66 3B 00 
00 00 


1C 


090 


ABARDARDAGADAAAADADADADAAAAADAKNAAAQAAKNAAVAANAANDAAAAAANAAANAAAANQAARAAAAVAAAAAAAAAAAAIAAAVDAARVQAAAIIVAVIVAAVIAAVAAIAAAAAAA 


00h, 00h,01fh,011h,01fh,011h,011h,011b 
013h, 037h,077h,072h, 020h, 00h, 00h, 00h 
00h, 00h, 018h,018h, Odbh, 03ch,0e7h, 03ch 
Odbh,018h,018h,00h,00h,00h,00h,00h ; 
00h, 00h, 040h, 060h,070h,07ch,07fh, 07ch 
070h,060h,040h,00h,00h,00h,00h,00h ; 
00h, 00h, 01h,03h,07h,01fh,07fh,01fh 
07h, 03h, 01h, 00h, 00h,00h,00h,00h ; 
00h, 00h, 018h,03ch,07eh,018h,018h,018h 
OTeh,03ch,018h,00h,00h,00h,00h,00h ; 
00h, 00h, 033h, 033h, 033h,033h, 033h,033h 
00h, 00h, 033h, 00h, 00h, 00h, 00h, 00h ; 
00h, 00h, 07fh, Odbh, Odbh, Odbh,07bh,01bh 
O1bh,01bh,01bh,00h,00h,00h,00h,00h ; 
00h, 03eh, 063h, 030h, 01ch,036h, 063h, 063h 
036h,01ch, 06h, 063h,03eh,00h,00h, 00h ; 
00h, 00h, 00h, 00h, 00h,00h,00h,00h 
OTeh,07eh,07eh,00h,00h,00h,00h,00h ; 
00h, 00h, 018h,03ch,07eh,018h,018h,018h 
O7eh,03ch,018h, Offh,00h,00h,00h,00h ; 
00h, 00h, 018h,03ch,07eh,018h,018h,018h 
018h,018h,018h,00h,00h,00h,00h,00h_ ; 
00h, 00h,018h,018h,018h,018h,018h,018h 
O7eh,03ch,018h,00h,00h,00h,00h,00b ; 
00h, 00h, 00h, 00h, 0ch,06h,07fh, 06h 
Och,00h, 00h, 00h,00h,00h,00h,00h ; 
00h, 00h, 00h, 00h, 018h,030h, 07fh,030h 
018h, 00h, 00h, 00h, 00h, 00h,00h,00h ; 
00h, 00h, 00h, 00h, 060h, 060h, 060h, 060h 
O7fh,07fh,00h,00h,00h,00h,00h,00h_ ; 
00h, 00h, 00h, 00h, 024h, O42h, Of fh, O42h 
024h, 00h, 00h, 00h, 00h, 00h, 00h, 00h ; 
00h, 00h,00h,00h,00h,00h,00h,018h 
03ch,07eh,Offh,00h,00h,00h,00h,00h ; 
00h, 00h, 00h, 00h, 00h, Of fh, 07eh, 03ch 
018h, 00h, 00h, 00h, 00h, 00h, 00h, 00h ; 
00h, 00h, 00h, 00h, 00h, 00h, 00h, 00h 

00h, 00h, 00h, 00h, 00h, 00h, 00h, 00h ; 


00h,00h,018h, 03ch,03ch,03ch,018h,018h 


00h,018h,018h,00h,00h,00h,00h,00h Te 


00h, 00h, 066h, 066h,024h,00h,00h,00h 


00h,00h,00h,00h,00h,00h,00h,00h ie 


00h, 00h, 036h, 036h,07fh,036h,036h,036h 


O7fh,036h,036h,00h,00h,00h,00h,00h j;'#! 


08h,08h,03eh,063h, 060h,060h,03eh,03h 


03h,063h,03eh,08h,08h,00h,00h,00h singe 


00h, 00h, 00h, 061h,063h,06h,0ch,018h 


030h,063h,043h,00h,00h,00h,00h,00h_ ;'$! 


00h, 00h, 01ch,036h,036h,01ch,03bh,06eh 


066h,066h,03bh,00h,00h,00h,00h,00h ;'&! 


10 
11 
12 


13 


15 


17 


19 
la 
1b 


le 


id 

le 

if 
20 
21 
22 
23 


24 


26 


30 


00 


AAAAAVAAAAAAAAAAVAAAAAAAAAAAAAAAAAAAAARAAAAAAANAAARAAARAAAARKNAAANRAAAAANDAAAARAARAANKMAAANDAARARAAAAAANDAAAAAAAaaaa 


00h, 00h,030h,030h,030h,060h,00h,00h 
00h,00h,00h,00h,00h,00h,00h,00h ; 
00h, 00h, 0ch,018h,030h,030h,030h,030h 
030h,018h,0ch,00h,00h,00h,00h,00h ; 
00h,00h,030h,018h,0ch,0ch,0ch,0ch 
Och,018h,030h,00h,00h,00h,00h,00h ; 
00h, 00h, 00h, 00h, 066h,03ch,0ffh, 03ch 
066h,00h,00h,00h,00h,00h,00h,00h ; 
00h,00h,00h,00h,018h,018h,07eh,018h 
018h,00h,00h,00h,00h,00h,00h,00h ; 
00h,00h,00h,00h,00h,00h,00h,00h 
018h,018h,018h,030h,00h,00h,00h,00h ; 
00h,00h,00h,00h,00h,00h,07eh,00h 
00h,00h,00h,00h,00h,00h,00h,00h ; 
00h,00h,00h,00h,00h,00h,00h,00h 
00h,018h,018h,00h,00h,00h,00h,00h ; 
00h,00h,01h,03h,06h,0ch,018h,030h 
060h,040h,00h,00h,00h,00h,00h,00h ; 
00h, 00h, 03eh, 063h, 067h, 06fh,07bh,073h 
063h,063h,03eh,00h,00h,00h,00h,00h_ ; 
00h,00h,0ch,01ch,03ch,0ch,0ch,0ch 
Och,0ch,03fh,00h,00h,00h,00h,00h ; 
00h, 00h, 03eh, 063h,03h,06h,0ch,018h 
030h,063h,07fh,00h,00h,00h,00h,00h_ ; 
00h, 00h, 03eh, 063h,03h,03h,03eh,03h 
03h,063h,03eh,00h,00h,00h,00h,00h H 
00h, 00h, 06h, 0eh,01eh,036h,066h,07fh 
06h,06h,0fh,00h,00h,00h,00h,00h ; 
00h,00h,07fh,060h,060h,060h,07eh, 03h 
03h,063h,03eh,00h,00h,00h,00h,00h ; 
00h, 00h,01ch,030h, 060h, 060h,07eh,063h 
063h,063h,03eh,00h,00h,00h,00h,00h j; 
00h,00h,07fh,063h,03h,06h,0ch,018h 
018h,018h,018h,00h,00h,00h,00h,00h_ ; 
00h,00h, 03eh,063h,063h,063h,03eh,063h 
063h,063h,03eh,00h,00h,00h,00h,00h ; 
00h, 00h, 03eh, 063h, 063h,063h,03fh,03h 
03h,06h,01ch,00h, 00h, 00h, 00h, 00h ; 
00h,00h,00h,018h,018h,00h,00h,00h 
018h,018h,00h,00h,00h,00h,00h,00h ; 
00h,00h,00h,018h,018h,00h,00h,00h 
018h,018h,030h,00h,00h,00h,00h,00h_ ; 
00h, 00h, 06h, Och, 018h, 030h,060h,030h 
018h,0ch, 06h, 00h, 00h, 00h,00h,00h ; 
00h,00h,00h,00h,07eh,00h,00h,00h 
07eh,00h,00h,00h,00h,00h,00h,00h ; 
00h, 00h,060h,030h,018h,0ch,06h,0ch 
018h,030h,060h,00h,00h,00h,00h,00h_ ; 
00h, 00h, 03eh, 063h, 063h, 06h, Och, 0ch 


00h, Och, 0ch,00h,00h,00h,00h,00h ; 


‘yt 


Or 


qt 


tor 


tye 


5 


"6! 


7! 


"ge! 


"<1 


Lbs a | 


27 


28 


29 


2a 


2b 


2c 


2d 


2e 


33 


36 


37 


38 
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ee 


C460 00 00 3E 63 63 6F c DB 00h,00h,03eh, 063h,063h, 06fh, 06fh,06fh 

C468 A 4A 3E 00 00 00 ¢ DB 06eh,060h,03eh,00h,00h,00h,00h,00h ;'@' 40 
C470 o rf 08 1C 36 63 c DB 00h, 00h,08h,01ch,036h,063h,063h,07fh 

C478 a b 63 00 00 00 ¢ DB 063h,063h,063h,00h,00h,00h,00h,00h ;'A' 41 
C480 be 30 TE 33 33 32 c DB 00h, 00h, 07eh, 033h, 033h, 032h, 03eh,033h 

C488 33 33 TE 00 00 00 C DB 033h,033h,07eh,00h,00h,00h,00h,00h ;'B' 42 
C490 00 20 1E 33 60 60 C DB 00h, 00h,01eh,033h, 060h, 060h, 060h,060h 

C498 0 + 1E 00 00 00 ¢ DB 060h,033h,01eh,00h,00h,00h,00h,00h ;'Ct 43 
C4 AO OG 06 Te 36 33 33 c DB 00h, 00h, 07ch, 036h, 033h,033h,033h,033h 

C4A8 33 36 7C 00 00 00 é DB 033h,036h,07ch,00h,00h,00h,00h,00h ;'D' 44 
C4BO of TF 33 30 34 c DB 00h, 00h, 07fh,033h,030h,034h,03ch,034h 

C4BB 30 33 7F 00 00 00 ¢ DB 030h,033h,07fh,00h,00h,00h,00h,00h ;'E' 45 
c4co 00 res TF 31 34 3¢ ¢ DB 00h,00h,07fh,031h,034h, 03ch,03ch,034h 

C4C8 30 30 78 00 00 00 ¢ DB 030h,030h,078h,00h,00h,00h,00h,00h ;'F' 46 
c4DO 00 00 1E 33 60 60 ¢ DB 00h, 00h,01eh,033h,060h,060h,060h, 06fh 

C4D8 63 4 1D 00 00 00 = DB 063h,033h,01dh,00h,00h,00h,00h,00h ;'G' 47 
C4EO a 20 63 63 63 63 ¢ DB 00h,00b,063h, 063h, 063h,063h,07fh,063h 

Ch EB é3 63 00 00 00 DB 063h,063h,063h,00h,00h,00h,00h,00h ;'H' 48 
c4uFO 00 00 3c 18 18 18 ¢ DB 00h,00h,03ch,018h,018h,018h,018h,018h 

C4F8 ‘s 3 3c 00 00 00 : DB 018h,018h,03ch,00h,00h,00h,00h,00h ;'I' 49 
c500 00 00 OF 06 06 06 ¢ DB 00h,00h,0fh,06h,06h,06h,06h,06h 

c508 66 86 3C 00 00 00 DB 066h,066h,03ch,00h,00hb,00h,00h,00h j;'J' 4a 
c510 30 00 73 33 36 36 ¢ DB 00h, 00h, 073h,033h,036h,036h, 03ch,036h 

c518 36 a5 73 00 00 00 : DB 036h,033h,073h,00h,00h,00h,00h,00h ;'K' 4b 
c520 30 OD 78 30 30 30 ¢ DB 00h, 00h, 078h, 030h, 030h,030h, 030h,030h 

c528 30 33 TF 00 00 00 ¢ DB 030h,033h,07fh,00h,00h,00h,00h,00h ;'L' 4o 
C530 00 20 63 77 TF 6B ¢ DB 00h,00h,063h,077h,07fh,06bh,063h,063h 

C538 re cs 63 00 00 00 ¢ DB 063h,063h,063h,00h,00h,00h,00h,00h ;'M' 4d 
C540 00 00 63 73 7B 7F : DB 00h,00h,063h,073h,07bh,07fh, 06fh,067h 

C548 a4 ral 63 00 00 00 : DB 063h,063h,063h,00h,00h,00h,00h,00h ;'N' he 
C550 a 30 1C 36 63 63 : DB 00h, 00h, 01ch,036h, 063h,063h,063h,063h 

c558 re 3 1C 00 00 00 ¢ DB 063h,036h,01ch,00h,00h,00h,00h,00h ;'0! 4f 
C560 o fs TE 33 33 33 : DB 00h, 00h, 07eh,033h, 033h,033h,03eh,030h 

C568 30 30 78 00 00 00 : DB 030h,030h,078h,00h,00h,00h,00h,00h ;'P' 50 
C570 re a0 1C 36 63 63 ¢ DB 00h, 00h, 01ch,036h, 063h,063h,063h,063h 

C578 ee = 1¢ 06 03 00 ¢ DB 06bh,03eh,01ch,06h,03h,00h,00h,00h ;'Q' 51 
C580 00 of TE 33 33 33 ¢ DB 00h, 00h,07eh,033h,033h,033h,03eh,036h 

C588 33 - 33 00 00 00 ¢ DB 033h,033h,033h,00h,00h,00h,00h,00h ;'R' 52 
c590 a 20 3E 63 63 30 : DB 00h, 00h, 03eh, 063h, 063h,030h,01ch,06h 

C598 bs 83 3E 00 00 00 ‘ DB 063h,063h,03eh,00h,00h,00h,00h,00h ;'S! 53 
C5 A0 a Pe TE 5A 18 18 C DB 0O0h,00h,07eh,05ah,018h,018h,018h,018h 

C58 18 : 3C 00 00 00 ¢ DB 018h,018h,03ch,00h,00h,00h,00h,00h ;'T' 54 
C5B0 ne x 63 63 63 63 DB 00h,00h, 063h, 063h, 063h,063h,063h,063h 

C5B8 re 3 3E 00 00 00 C DB 063h,063h,03eh,00h,00h,00h,00h,00h ;'U' 55 
c5C0 as 00 63 63 63 63 C DB 00h, 00h, 063h, 063h, 063h, 063h,063h,063h 

C58 36 te 08 00 00 00 ; DB 036h,01ch,08h,00h,00h,00h,00h,00h j'V' 56 
c5D0 a BB 63 63 63 63 ¢ DB 00h, 00h, 063h, 063h, 063h, 063h, 063h, 06bh 

c5D8 oe 7 36 00 00 00 : DB 06bh,07fh,036h,00h,00h,00h,00h,00h ;'W' 57 
C5 E0 a a 63 63 63 36 ¢ DB 00h, 00h, 063h,063h, 063h,036h,01ch,036h 

C5 E8 63 es 63 00 00 00 c DB 063h,063h,063h,00h,00h,00h,00h,00h ;'X' 58 
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00h, 00h, 066h, 066h, 066h, 066h, 066h, 03ch 
018h,018h,03ch,00h,00h,00h,00h,00h ;'Y! 
00h, 00h, 07fh,063h, 06h,0ch,018h,030h 
060h,063h,07fh, 00h, 00h,00h,00h, 00h sta! 
00h, 00h, 03ch,030h,030h,030h,030h,030h 
030h,030h,03ch,00h,00h,00h,00h,00h ;'[! 
00h,00h,040h,060h,030h,018h,0ch,06h 
03h,01h,00h,00h,00h,00h,00h,00h Hie 
00h,00h,03ch,0ch,0ch,0ch,O0ch,0ch 
Och,0ch,03ch,00h,00h,00h,00h,00h zt] 
08h, 01ch,036h, 063h, 00h, 00h, 00h, 00h 
00h,00h,00h, 00h, 00h, 00h,00h,0Ch SON 
00h,00h,00h,00h,00h,00h,00h, 00h 
00h,00h,00h,00h,00h,00h,07fh,00h Hee 
018h,018h,0ch,00h,00h,00h,00h,00h 
00h,00h,00h,00h,00h,00h,00h,00h eal 
00h, 00h, 00h, 00h, 00h, 03ch, 06h, 03eh 
066h,066h,03bh,00h,00h,00h,00h,00h ;'a!t 
00h, 00h, 070h,030h,030h, 03eh,033h,033h 
033h,033h,06eh,00h,90h,00h,00h,00h ;'b! 
00h,00h,00h, 00h, 00h, 03eh,063h,060h 
060h,063h,03eh, 00h, 00h, 00h, 00h, 00h ;'o! 
00h, 00h, Oeh, 06h, 06h, 03eh,066h, 066h 
066h,066h,03bh,00h,00h,00h,00h,00h ;'a! 
00h,00h,00h, 00h, 00h, 03eh,063h,07fh 
060h,063h,03eh,00h,00h, 00h, 00h, 00h ;"e! 
00h,00h,01eh,033h,030h,030h,07ch,030h 
030h,030h,078h,00h,00h,00h,00h,00h ;'Ff! 
00h, 00h, 00h, 00h, 00h, 03bh,066h, 066h 
066h,066h, 03eh, 06h, 066h, 03ch, 00h, 00h 
00h,00h,070h, 030h,036h, 03bh,033h, 033h 
033h,033h,073h,00h,00h,00h,00h,00h ;'h! 
00h,00h,0ch,0ch,00h,01ch,0ch,0ch 
Och,0ch,01eh,00h, 00h, 00h, 00h, 00h ;tar 
00h,00h,0ch,0ch,00h,01ch,0ch,0ch 
Och,Och,Och,0ch,0cch,078h, 00h, 00h rae 
00h, 00h, 070h, 030h, 030h,033h, 036h, 03ch 
036h,033h,073h,00h,00h,00h,00h,00h ;'k! 
00h, 00h,01ch,0ch,0ch,0ch,0ch,0ch 
Och,O0ch,01eh,00h,00h,00h, 00h, 00h rae 
00h,00h, 00h, 00h, 00h, 066h,07fh, 06bh 
06bh,06bh,06bh,00h,00h,00h,00h,00h_ ;'m! 
00h,00h,00h, 00h, 00h, 06eh, 033h,033h 
033h,033h,033h,00h,00h,00h,00h,00h_ ;'n! 
00h, 00h,00h,00h,00h,03eh,063h,063h 
063h,063h,03eh,00h,00h,00h,00h,00h_ ;'o? 
00h,00h,00h,00h, 00h, 06eh,033h,033h 
033h,033h,03eh,030h,030h,078h,00h,00h 
00h,00h,00h,00h,00h,03bh,066h,066h 


066h,066h,03eh,06h,06h,0fh,00h,00h ;'q! 


59 


5a 


5b 


50 


5e 


Sf 


60 


61 


62 


63 


64 


65 


66 


68 


69 


6a 


6b 


6c 


6d 


6e 


6f 


71 


>'e’ 


Han © 


67 


70 


8-47 


ROM BIOS 
Listing 


C780 00 00 00 00 00 6E c DB 00h, 00h, 00h, 00h, 00h, 06eh, 03bh,030h 
3B 30 Cc 
C788 30 30 78 00 00 00 c DB 030h,030h,078h,00h,00h,00h,00h,00h j;'r' 72 
00 00 Cc 
C790 00 00 00 00 00 3E c DB 00h, 00h, 00h, 00h, 00h, 03eh, 063h,038h 
63 38 c 
C798 OE 63 3E 00 00 00 Cc DB Oeh,063h,03eh,00h,00h,00h,00h,00h ue Sli A | 
00 00 c 
C7TAO 00 00 00 08 18 7E c DB 00h,00h,00h,08h,018h,07eh,018h,018h 
18 18 c 
C7A8 18 1B OE 00 00 00 c DB 018h,01bh,0eh,00h,00h,00h,00h,00h j;'t' 74 
00 00 c 
C7BO 00 00 00 00 00 66 c DB 00h,00h, 00h, 00h, 00h, 066h,066h,066h 
66 66 c 
C7B8 66 66 3B 00 00 00 Cc DB 066h,066h,03bh,00h,00h,00h,00h,00h ores 15 
00 00 Cc 
C7CO 00 00 00 00 00 63 c DB 00h, 00h, 00h, 00h, 00h, 063h, 063h,063h 
63 63 c 
C7C8 36 1C 08 00 00 00 Cc DB 036h,01ch,08h,00h,00h,00h,00h,00h s'v' 76 
00 00° C 
C7D0 00 00 00 00 00 63 Cc DB 00h, 00h, 00h, 00h, 00h, 063h, 06bh,06bh 
6B 6B c 
C7D8 6B 7F 36 00 00 00 Cc DB 06bh,07fh,036h,00h,00h,00h,00h,00h j;'w' 77 
00 00 c 
CTEO 00 00 00 00 00 63 Cc DB 00h, 00h, 00h, 00h, 00h, 063h,036h,01ch 
36 1C Cc 
CTE8 1C 36 63 00 00 00 Cc DB 01ch,036h,063h,00h,00h,00h,00h,00h j;'x' 78 
00 00 C 
C7FO 00 00 00 00 00 63 Cc DB 00h, 00h, 00h, 00h, 00h, 063h,066h,066h 
66 66 c 
CTF8 66 66 3E 06 66 3C c DB 066h,066h,03eh, 06h, 066h,03ch,00h,00h sty? “79 
00 00 C 
C800 00 00 00 00 00 7F c DB 00h,00h,00h,00h,00h,07fh,066h, Och 
66 OC Cc 
c808 18 33 7F 00 00 00 c DB 018h,033h,07fh,00h,00h,00h,00h,00h ;'z' 7a 
00 00 Cc 
C810 00 00 OF 18 18 18 c DB 00h,00h,0eh,018h,018h,018h,070h,018h 
70 18 Cc 
C818 18 18 OE 00 00 00 c DB 018h,018h,0eh,00h,00h,00h,00h,00h j;'{' 7b 
00 00 c 
c820 00 00 18 18 18 18 c DB 00h,00h,018h,018h,018h,018h,00h,018h 
00 18 Cc 
c828 18 18 18 00 00 00 c DB 018h,018h,018h,00h,00h,00h,00h,00h ;'I' To 
00 00 C 
C830 00 00 70 18 18 18 c DB 00h,00h,070h,018h,018h,018h,0eh,018h 
OE 18 Cc 
c838 18 18 70 00 00 00 Cc DB 018h,018h,070h,00h,00h,00h,00h,00h se} Ta 
00 00 Cc 
C840 00 00 3B 6E 00 00 Cc DB 00h,00h,03bh,06eh,00h,00h,00h,00h 
00 00 C 
C848 00 00 00 00 00 00 Cc DB 00h,00h,00h,00h,00h,00h,00h,00h 3'~" Te 
00 00 Cc 
C850 00 00 00 00 08 1C Cc DB O00h,00h,00h,00h,08h,01ch,036h,063h 
36 63 c 
C858 63 7F 00 00 00 00 Cc DB 063h,07fh,00h,00h,00h,00h,00h,00h yers TF 
00 00 Cc 
C ;End of font matrix 
Cc 
C860 C fontlol6 endp 
c860 font_hi_8x8 label byte ; 1024 bytes 
C include fonthi8.asm 
Cc 
C860 C fonthi8 proc near 
Cc +s SystemFont ; <hi_mediumres> (M24) 8 x 8 font table for M24 
Cc 
C860 1E 33 60 33 Cc DB 0O1eh,033h,060h,033h 
C864 1E 08 04 08 c DB 01eh,08h,04h,08h H 0 
C868 66 00 66 66 Cc DB 066h,00h,066h,066h 
C86C 66 66 66 3B c DB 066h,066h,066h,03bh ; 1 
C870 06 OC 00 1E Cc DB 06h,0ch,00h,01eh 
C874 33 3F 30 1E c DB 033h,03fh,030h,01eh ; 2 
C878 08 14 00 3c c DB 08h,014h,00h,03ch 
C87C 06 3E 66 3B c DB 06h,03eh,066h,03bh : 3 
c880 00 36 00 3C c DB 00h,036h,00h,03ch 
C884 06 3E 66 3B c DB 06h,03eh,066h,03bh ; 4 
c888 30 18 00 3C Cc DB 030h,018h,00h,03ch 
C88C 06 3E 66 3B Cc DB 06h,03eh,066h,03bh H 5 
c890 08 14 08 3C c DB 08h,014h,08h,03ch 
c894 06 3E 66 3B Cc DB 06h,03eh,066h,03bh ; 6 
C898 3C 66 60 66 c DB 03ch,066h,060h,066h 
c89C 3C 08 04 08 Cc DB 03ch,08h,04h,08h ; 7 
C8A0 18 34 00 3E Cc DB 018h,034h,00h,03eh 
C8A4 63 7F 60 3E Cc DB 063h,07fh,060h,03eh ; 8 
C8A8 00 36 00 3E c DB 00h,036h,00h,03eh 
C8AC 63 7F 60 3E c DB 063h,07fh,060h,03eh ; 9 
C8BO 30 18 00 3c c DB 030h,018h,00h,03ch 
C8BY 66 7E 60 3C c DB 066h,07eh,060h,03ch ; a 
C8B8 00 36 00 1C c DB 00h,036h,00h,01ch 
CBBC OC OC OC 1E c DB Och,0ch,0ch,01eh ; b 
c8coO 6008 14 00 1C c DB 08h,014h,00h,01ch 
c8C4 OC OC 0C 1E c DB Och,0ch,0ch,01eh ; e 
c8c8 30 18 00 1C C DB 030h,018h,00h,01ch 
c8cc oc OC OC 1E Cc DB Och,Och,0Och,01eh : d 
C8D0 66 00 18 3C c DB 066h,00h,018h,03ch 
C8D4 66 TE 66 66 c DB 066h,07eh,066h,066h ; e 
C8D8 18 24 18 3c Cc DB 018h,024h,018h,03ch 
C8DC 66 7E 66 66 Cc DB 066h,07eh,066h,066h ; f 
C8EO OC 18 7F 31 Cc DB Och,018h,07fh,031h 
C8E4Y 3C 30 31 7F Cc DB 03ch,030h,031h,07fh ; 10 


POG AACA OE AAS A ASAASROGAO GIAO OMIOOTE AS HHA OOS HOS OR OR aeaMasonaeaenasoCaoonaneMadenaaceeaeahsaaanseneceecs 


00h,036h,04bh,0fh 
038h,058h,05dh,036h 
00h,01fh,028h,049h 
O4fhH,079h,048h,04fh 
08h,014h,00h,01ch 
036h,063h,026h,01ch 
00h,036h,00h,01ch 
036h,063h,036h,01ch 
030h,018h,00h,01ch 
036h,063h,036h,01ch 
08h,014h,00h,066h 
066h,066h,066h,03bh 
030h,018h,00h,066h 
066h,066h,066h,03bh 
066h, 00h, 066h, 066h 
066h,03eh,06h,078h 
00h,036h,00h,01ch 
036h,063h,036h,01ch 
00F,063h,00h,063h 
063h,063h,063h,03eh 
08h,08h,03eh,040h 
040h,03eh,08h,08h 
Oeh,01bh,018h,03ch 
018h,018h,039h,07eh 
022h,014h,08h,03eh 
08h,03eh,08h,08h 
070h,048h,072h,042h 
O47h,042h,042h,01h 
O0ch,012h,010h,038h 
010h,010h,050h,020h 
06h,0ch,00h, 03ch 
06h,03eh,066h,03bhn 
06h,0ch,00h,01ch 
Och,Och,0ch,01eh 
06h,0ch,00h,0ich 
036h,063h,036h,01ch 
06h,0ch,00h,066h 
066h,066h,066h,03bh 
033h,0cch,00h,07ch 
066h,066h,066h,066h 
033h,0cch,063h,073h 
O7bh,06fh,067b,063h 
00h,03ch,06h,03eh 
066h,03bh,00h,07fh 
00h,01ch,036h,063h 
036h,01ch,00h,07fh 
018h,00h,018h,018h 
030h,046h,03ch,00h 
00h,00h,07fh,060h 
060h,00h,00h,00h 
00h,00h,07fh,03h 
03h,00h,00h,00h 
020h,062h,024h,028h 
016h,021h,042h,07h 


020h,062h, 024h, 02ah 


016h,02ah,04fh,02h 
018h,018h,00h,018h 
018h,03ch,030h,018h 
00h,01bh,036h, 06ch 
036h,01bh,00h,00h 
00h,06ch,036h,01bh 
036h,06ch,00h,00h 
022h,088h,022h,088h 
022h,088h,022h,088h 
055h,0aah,055h,0aah 
055h,0aah,055h,0aah 
Oceh,077h,0ceh,077h 
Oceh,077h,0ceh,077h 
018h,018h,018h,018h 
018h,018h,018h,018h 
0186h,018h,018h,0f8h 
018h,018h,018h,018h 
018h,018h,0f8h,018h 
0f8h,018h,018h,018h 
036h,036h,036h,0f6h 
036h,036h,036h,036h 
00h,00h,00h,0feh 
036h,036h,036h,036h 
00h,00h,0f8h,018h 
0f8h,018h,018h,018h 
036h,036h,0f6h,036h 
0f6h,036h,036h,036h 
036h,036h,036h,036h 
036h,036h,036h,036h 
00h,00h,0feh,06h 
0f6h,036h,036h,036h 
036h,036h,0f6h,06h 
Ofeh,00h,00h,00h 
036h,036h,036h,0feh 
00h,00h,00h,00h 
018h,018h,0f8h,018h 
O0f8h,00h,00h,00h 
00h,00h,00h,0f8h 
018h,018h,018h,018h 
018h,018h,018h,01fh 
00h,00h,00h,00h 
018h,018h,018h,0ffh 
00h,00h,00h,00h 
0Ch,00h,00h,0ffh 
018h,018h,018h,018h 


;'Bt 


42 


ROM BIOS 
Listing 


8-49 


ROM BIOS 
Listing 


—— 


AACA AHHOEAHHHAAADAGHOAOAAADAGAGAAAQAHAAAAAAAHHNANAGAGAAAGDAAHANVAAGAHAAAAAQAGQAAAAAAAAAGAAGAGAAAAHAABAQGARAAABAG 


018h,018h,018h,01fh 
018h,018h,018h,018h 
00h, 00h,00h,0ffh 
00h,00h,00h,00h 
018h,018h,018h,0ffh 
018h,018h,018h,018h 
018h,018h,01fh,018h 
01fh,018h,018h,018h 
036h,036h,036h,037h 
036h,036h,036h,036h 
036h,036h,037h,030h 
03fh,00h,00h,00h 
00h, 00h, 03fh,030h 
037h,036h,036h,036h 
036h,036h,0f7h,00h 
offh,00h,00h,00h 
00h,00h,0ffh,00b 
Of7h,036h,036h,036h 
036h,036h,037h,030h 
037h,034h,034h,034h 
00h,00h,0ffh,00h 
Offh,00h,00h,00b 
036h,036h,0f7h, 00h 
Of7h,036h,036h,036h 
018h,018h,0ffh, 00h 
Offh,00h,00h,00h 
036h, 036h,036h,0ffh 
00h,00h,00h,00h 
00h,00h,0ffh,00h 
offh,018h,018h,018h 
00h,00h,00h,0ffh 
036h,036h,036h,036h 
036h,036h,036h,03fh 
00h,00h,00h,00h 
018h,018h,01fh,018h 
01fh,00h,00h,00h 
00h,00h,01fh,018h 
01fh,018h,018h,018h 
00h,00h,00h,03fh 
036h,036h,036b,036h 
036h,036h,036h,0ffh 
036h,036h,036b,036h 
018h,018h,0ffh,018h 
offh,018h,018h,018h 
018h,018h,018b,0f8b 
00h,00h,00b,00h 
00h,00h,00h,01fb 
018h,018h,018h,018h 
ofrfh,offh,offh,offh 
orfh,offh,offh,offh 
00h,00h,00b,00h 
offh,Offh,Offh,0ffh 
OfOh,Of0h,0f0Oh,0f0h 
OfOh,Of0h,0f0h,0fOh 
Ofh,Ofh,Ofh,O0fb 
Ofh,Ofh,Ofh,Ofh 


Offh,Offh,oOffh,Offh 


00h,00h,00h,00h 
00h,00h,03bh,06eh 
06ch,06ch,06eh,03bh 
03eh,063h,07eh,063h 
063h,07eh,060h,060h 
00h,07eh,032h,030h 
030h,030h,030h,078h 
00h,01h,07fh,054h 
014h,014h,014hb,014h 
00h,07fh,061h,030h 
018h,030h,061h,07fh 
00h,00h,01fh,034h 
062h,062h,034h,018h 
00h,036h,036h,036h 
03ch,030h,030h,060h 
00h,03bh,06eh,0ch 
Och,O0ch,00h,00h 
066h,03ch,018h,03ch 
00h,01ch,036h,063h 
07fh,063h,036h,01ch 
00h,01ch,036h,063h 
063h,036h,036h,077h 
01eh,030h,018h,0ch 
03eh,066h,066h,03ch 
00h,00h,076h,0dbh 
Odbh,06eh,00h,00h 
03h,06h,07eh, 0Odbh 
Odbh,O07eh,060h,0c0h 
00h,01ch,030h,060h 
07ch,060h,030h,01ch 
00h,00h,03eh,063h 
063h,063h,063h,063h 
00h,00h,03eh,00h 
03eh,00h,03eh,00h 
018h,018h,07eh,018h 
018h,00h,07eh,00h 
018h,0ch,06h,0ch 
018h,00h,03eh,00h 
Och,018h,030h,018h 
Och,00h,03eh,00h 
Oeh,01bh,01bh,018h 
018h,018h,018h,018h 
018h,018h,018h,018h 


Cc60 


CC60 


00co 
00C1 
00C2 
00C3 
00ck 
00C5 
00C6 
00C7 


00c8 
00c9 
OOCA 
OOCB 
oocc 
oocD 


OOCE 
OOCF 
ooDO 
0OD1 
o00D2 
00D3 
OoD4 
00D5 
00D6 
0OD7 


00D8 


CC60 


cc60 
CC61 
CC62 
CC63 
CC64 
CC65 
CC66 


QAAQAQAAAANAANAANAAANAANANANAAaAAaA 


AAAAAQVAQAAAAAAGUAAAAAAAAAAAAAAAAAAAAAAAAAAAARAAAAGDAARAANANRAANAAAAAARAAGAAAAAaAAaAaaAA 


ROM BIOS 
Listing 


DB 018h,0d8h,0d8h,070h ;'u' 75 
DB 00h,018h,018h,00h 
DB 03eh,00h,018h,018h ;'v! 76 
DB 00h,00h,03bh,06eh 
DB 00h,03bh,06eh,00h j;'w' 77 
DB 00h,038h,06ch,06ch 


DB 038h,00h, 00h, 00h ;'x' 78 
DB 00h,018h,03ch,03ch 

DB 018h,00h, 00h, 00h sty" 79 
DB 00h,00h,00h,018h 

DB 018h,00h, 00h, 00h ;'z' Ta 


DB Ofh,Och,0ch,0ch 

DB Och,06ch,03ch,01ch ;'{' 7b 
DB 06ch,036h,036h,036h 

DB 036h,00h,00h,00h 7°" ‘Ve 
DB 08h,014h,04h,08h 

DB 010h,01ch,00h,00h sth" Ta 
DB 00h,01ch,01ch,01ch 


DB Otch,01ch,00h,00h j;'~' Te 
DB 00h,00h,00h,00h 
DB 00h,00h,00h,00h ; Tf 


;End of font matrix 
fonthi8 endp 
code ends 


include kbdata.asm 


for different keyboards. 


pS SSSSSSS SSS SS SSS SSSSSSSSSSSSSSSSSSSSSS SS SH SSSSSSSSSSHRSSHSHSSSSSSSssesece 
; Filename: kb. data: USA-ASCII 

’ 

; This module includes the keyboard scan code translation data 

H 

’ 


code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


kb_data1 proc 


kbins equ OCOh ; kb_insert_lock (min_case) 

kbcap equ OCih ; kb_caps_lock 

kbnum equ O0C2h ; kb_num_lock 

kbscr equ O0C3h ; kb_scroll_lock 

kbalt equ OC4h ; kb_alt_lock 

kbetl equ OC5h ; kb_control_lock 

kbl sh equ 0C6h ; kb_l_shift_lock 

kbrsh equ OCT7Th ; kb_r_shift_lock 

kbres equ OC8h ; kb_reset (mid_case) 

kbbrk equ OC9h ; kb_break 

pause equ OCAh ; kb_pause 

kbprt equ OCBh ; kb_print_screen 

kbnul equ OCCh ; kb_null 

kNONE equ OCDu ; kb_none 

kdec9 equ OCEh ; kb_alt_dec_9 

kdec8 equ OCFh ; kb_alt_dec_8 

kdec7 equ ODOh ; kb_alt_dec_7 

kdec6 equ OD1ih ; kb_alt_dec_6 

kdec5 equ OD2h ; kb_alt_dec_5 

kdec4 equ OD3h ; kb_alt_dec_4 

kdec3 equ OD4h ; kb_alt_dec_3 

kdec2 equ OD5h ; kb_alt_dec_2 

kdec1 equ OD6h ; kb_alt_dec_1 

kdecO equ OD7h ; kb_alt_dec_0 

kdblo equ OD8h ; kb_double_zero (max_case) 

; leet ee ee eee 

; 7 CapLk Bytes 

; elle eee ee ee ee ee ee 
kb_cap_flags label byte 

db 00000000b ; scancode 00 (00h) - 07 (07h) ESC to '6! 

db 00000000b ; scancode 08 (08h) - 15 (OFh) '7! to HT 

db TERAUTWA Tb ; scancode 16 (10h) = 23 (17h) ‘'q! to 'i' 

db 11000011b ; scancode 24 (18h) - 31 (1Fh) ‘ot & 'pt to 'ta' & 's! 
db 11111110b ; scancode 32 (20h) - 39 (27h) ‘ad! to "27" & % 3% 
db 00001111b ; scancode 40 (28h) - 47 (2Fh) ':' to '\t to 'z' to 'v! 
db 11100000b ; scancode 48 (30h) - 55 (37h) '‘'b' to 'm' to ',' to '#! 


; | KB | KBs | 
} wee ee we ee we eB ee BE Be ee ee ew ee ee ee Re ee BO eM eB ee ew we ew ee ew ew ee ee ewe ee ee ee ee eee eee 
kb_data_table label byte 
dw (1Bh) ® 100h + (1Bh) ; 01 Oth ESC ESC (BASE) 
dw (1Bh) * 100h + (1Bh) ; ESC ESC (SHIFT) 
dw (1Bh) ® 100h + (1Bh) ; ESC ESC (CTL) 
dw KNONE * 100h + KNONE ; None None (ALT) 


8-51 


ROM BIOS 


Listing 

CC6F 3131 Cc dw (31h) * 100h + (31h) ; 02 02h 1 1 

cert 2121 Cc dw (21h) # 100h + (21h) : ! ! 

cc73 cCDCD (e dw kKNONE ® 100h + kKNONE ; None None 
CC75 7800 Cc dw 7800h ; X120 

CC7T7T 3232 Cc dw (32h) * 100h + (32h) ; 03 03h 2 2 

cC79 2240 Cc dw (22h) * 100h + (40h) : " é@ 

CC7B CDCC C dw kKNONE # 100h + kbnul ; None NUL=X03(“*@) 
cc7D 7900 Cc dw 7900h ; X121 

CCTF 3333 c dw (33h) * 100h + (33h) ; O4 O4h 3 3 

CC81 92323 Cc dw (23h) * 100h + (23h) ; # # 

cc83 CDCD Cc dw kNONE ® 100h + kNONE ; None None 
cC85 7A00 Cc dw 7A00h ; X122 

CC87 «3434 Cc dw (34h) * 100h + (34h) ; 05 05h 4 4 

cc89 2424 Cc dw (24h) * 100h + (24h) : $ $ 

cc8B cCDCD Cc dw KNONE * 100h + kNONE ; None None 
cc8D 7BO00 Cc dw 7BOOh ; x123 

CC8F 3535 Cc dw (35h) ® 100h + (35h) ; 06 06h 5 5 

CC91 2525 C dw (25h) * 100h + (25h) ; $ $ 

cc93 CDCD Cc dw kKNONE ® 100h + KkNONE ; None None 
cc95 7C00 Cc dw 7COOh ; X124 

CC9T 3636 Cc dw (36h) ® 100h + (36h) ; O7 O7Th 6 6 

CC99 265E Cc dw (26h) ® 100h + (5Eh) : & . 

CC9B CDIE Cc dw kNONE # 100h + (1Eh) ; None RSiC**) 
cc9D 7D00 Cc dw 7D00h ; X125 

CC9F 3737 cC dw (37h) * 100h + (37h) ; 08 08h 7 7 

CCA1 2726 Cc dw (27h) ® 100h + (26h) ; ' & 

CCA3 CDCD Cc dw KNONE * 100h + kNONE ; None None 
CCA5 7£E00 Cc dw 7EOOh ; X126 

CCAT 3838 Cc dw (38h) * 100h + (38h) ; 09 09h 8 8 

CCA9 282A Cc dw (28h) * 100h + (24h) ; ( * 

CCAB CDCD Cc dw kNONE *® 100h + KNONE ; None None 
CCAD 7FO0O Cc dw TFOOh ; X127 

CCAF 3939 Cc dw (39h) * 100h + (39h) ; 10 OAh 9 9 

CCB1 2928 Cc dw (29h) # 100h + (28h) ; ) ( 

CCB3 CDCD Cc dw KNONE * 100h + KNONE ; None None 
CCB5 8000 Cc dw 8000h ; X128 

CCB7 3030 Cc dw (30h) * 100h + (30h) ; 11 OBb 0 0 

CCB9 5F29 Cc dw (5Fh) ® 100h + (29h) ; ) 

CCBB 1FCD (3 dw (1Fh) #® 100h + kNONE ; US (*_) None 
CCBD 8100 Cc dw 8100h ; X129 

CCBF 2D2D Cc dw (2Dh) * 100h + (2Dh) 3; 12 0Ch - - 

CCC1 3D5F Cc dw (3Dh) * 100h + (5Fh) ; = _ 

cCC3  CDIF Cc dw kNONE ® 100h + (1Fh) ; None US. (*%) 
ccc5 8200 Cc dw 8200h ; X130 

CCC7 5E3D Cc dw (5Eh) * 100h + (3Dh) ; 13 ODh - = 

cCC9 7E2B Cc dw (7Eh) * 100h + (2Bh) ; 4 + 

CcCB 1ECD Cc dw (1Eh) # 100h + kNONE ; RS (**) None 
CCCD 8300 Cc dw 8300h ; X131 

CCCF 0808 cC dw (08h) * 100h + (08h) ; 14 OEb BS BS 

CCD1 0808 ¢c dw (08h) * 100h + (08h) ; BS BS 

CCD3 T7FTF Cc dw (7Fh) * 100h + (7Fh) ; DEL DEL 
CCD5 CDCD Cc dw KNONE * 100h + kNONE ; None None 
CCD7 0909 Cc dw (09h) # 100h + (09h) ; 15 OFb HT HT 

CCD9 OFOO Cc dw OFOOh ; RHT=X15 

CCDB CDCD Cc dw KNONE ® 100h + kNONE ; None None 
CCDD CDCD c dw kNONE ® 100h + kKNONE ; None None 
CCDF 7171 Cc dw (71h) *® 100h + (71h) ; 16 10h q q 

CCE1 5151 Cc dw (51h) # 100h + (51h) ; Q Q 

CCE3 1111 Cc dw (11h) ® 100h + (11h) ; DC1(*Q) DC1(*Q) 
CCE5 1000 Cc dw 1000h ; X16 

CCET  TUTT Cc dw (77h) * 100h + (77h) ; 17 11h w w 

CCE9 5757 Cc dw (57h) * 100h + (57h) F W W 

CCEB 1717 Cc dw (17h) * 100h + (17h) ; ETB(“W) ETB(“W) 
CCED 1100 Cc dw 1100h ; X17 

CCEF 6565 Cc dw (65h) * 100h + (65h) ; 18 12h e e 

CCF1 4545 Cc dw (45h) # 100h + (45h) : E E 

CCF3 0505 Cc dw (05h) * 100h + (05h) ; ENQ(*E) ENQ(“E) 
CCF5 1200 Cc dw 1200h ; X18 

CCF7T 7272 Cc dw (72h) ® 100h + (72h) ; 19 13h r r 

CCF9 5252 Cc dw (52h) ® 100h + (52h) ; R R 

CCFB 1212 Cc dw (12h) * 100h + (12h) A DC2(*R) DC2(*R) 
CCFD 1300 5 dw 1300h ; X19 

CCFF 7474 Cc dw (7T4Hh) * 100h + (74h) ; 20 14h t t 

CDO1 5454 Cc dw (54h) * 100h + (54h) ; T T 

CD03) «1414 Cc dw (14h) ® 100h + (14h) ‘ DC4(*T) DC4(*T) 
CD05 1400 Cc dw 1400h ; X20 

CDOT 7979 Cc dw (79h) * 100h + (79h) ; 21 15h y y 

CD09 5959 c dw (59h) # 100h + (59h) ; Y Y 

CDOB 1919 ( dw (19h) * 100h + (19h) ‘ EM (*Y) EM (*Y) 
CDOD 1500 Cc dw 1500h ; X21 

CDOF 7575 Cc dw (75h) * 100h + (75h) 3 22 16h u u 

CD11 5555 Cc dw (55h) * 100h + (55h) ; U U 

CD13. 1515 Cc dw (15h) *® 100h + (15h) ; NAK(*U) NAK(“*U) 
CD15 1600 c dw 1600h ; X22 

CD17 6969 (e dw (69h) * 100h + (69h) ; 23 17h i i 

CD19 «4949 Cc dw (49h) * 100h + (49h) ; hy I 

CD1B 0909 Cc dw (09h) * 100h + (09h) : HT (*I) HT (“I) 
CD1D 1700 Cc dw 1700h ; X23 

CDIF 6F6F Cc dw (6Fh) # 100h + (6Fh) ; 24 18h ° ° 

CD21 4F4F Cc dw (4Fh) ® 100h + (4Fh) ; 0) 0 

CD23. OFOF (o dw (OFh) # 100h + (OFh) ; SI (*O) SI (*0) 
CD25 1800 Cc dw 1800h ; X24 

CD27 7070 Cc dw (70h) *® 100h + (70h) ; 25 19h Pp Pp 

cD29 5050 Cc dw (50h) * 100h + (50h) ; P P 

CD2B 1010 Cc dw (10h) * 100h + (10h) ; DLE(*P) DLE(“P) 
cD2D 1900 Cc dw 1900h ; X25 

CD2F 405B Cc dw (40h) * 100h + (5Bh) ; 26 1Ah ée [ 

CD31 607B Cc dw (60h) * 100h + (7Bh) ; . { 

CD33  CC1B Cc dw kbnul * 100h + (1Bh) ; NUL=X03(*@) ESC(“*[) 
CD35 CDCD (a dw kKNONE * 100h + kKNONE ; None None 
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AAA AAA AD ADADAANANANAAMD AD AAMAAANAAANAANAANNAANANANAANAAAANNAANANANANANANAANANANANNAAANAANAAANANANANAAANANAAAAANAAANAAAANANAAANAANAAAAANA 


as 
Oo 
oO 
ia 

tet + eS Eh ES tH HF 


(5Dh) 
(7Dh) 
(1Dh) 
kKNONE 
(ODh) 
(ODh) 
(0 Ah) 
kNONE 
kbetl 
kbetl 
kbetl 
kbetl 
(61h) 
(41h) 
(01h) 


(73h) 
(53h) 
(13h) 


(64h) 
(44h) 
(04h) 


(66h) 
(46h) 
(06h) 


(67h) 
(47h) 
(07h) 


(68h) 
(48h) 
(08h) 


(6Ab) 
(4 Ah) 
(OAhb) 


(6Bh) 
(4Bh) 
(OBh) 


(6Ch) 
(4Ch) 
(0Ch) 


(3Bh) 
(3 Ah ) 
kNONE 
kNONE 
(27h) 
(22h) 
kNONE 
kNONE 
(60h) 
(7Eh) 
kNONE 
kNONE 
kblsh 
kbl sh 
kblsh 
kbl sh 
(5Ch) 
(7Ch) 
(1Ch) 
kN ONE 
(TAh) 
(5 Ah) 
(1Ah) 


(78h) 
(58h) 
(18h) 


(63h) 
(43h) 
(03h) 


(76h) 
(56h) 
(16h) 


(62h) 
(42h) 
(02h) 


(6Eh ) 
(4 Eh ) 
(OEh) 


wee we ee we - ar wee ee ee ee ee wee ee Mee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ne Oe ee ee ee ee ee Oe ee ee ee ee Ne ee ee He ee ee ee Oe ee Oe ee ee ee ee ee ee we ee ee we ee 


1Bh 


1Ch 


1Dh 


1Eh 


1Fh 


20h 


21h 


22h 


23h 


24h 


25h 


26h 


27h 


28h 


29h 


2 Ah 


2Bh 


2ch 


2Dh 


2Eh 


2Fh 


32h 


33h 


{ 


None 


D 
EOT(*D) 
X32 

f 

F 
ACK(“*F) 
X33 

& 

G 

BEL (“G) 
X34 


LF (*J) 


vT (°K) 
X37 
1 


L 

FF (“L) 
x38 

H 

+ 

None 
None 


. 
. 


& 
None 
None 
] 
} 


Gs (*)) 
None 
LShft 
LShft 
LShft 
LShft 

\ 

| 

FS (“\) 
None 

Zz 

vA 
SUB(“Z) 
X4y 

x 

Xx 
CAN(“X) 
X45 

c 

Cc 
ETX(*C) 
X46 

Vv 


Vv 
SYN(“V) 
X47 

b 


B 
STX(“B) 
X48 

n 

N 

SO (“N) 
x49 

n 

M 

CR (7M) 
X50 

’ 

< 

None 
None 


ROM BIOS 
Listing 


] 


} 
ESc(*C) Gs. ¢77) 


None 


SOH(“A) 


8 
Ss 
DC3(7S) 


d 
D 
EOT(“D) 


f 
F 
ACK(*F) 


3 
G 
BEL (*G) 


Vv 
SYN(“V) 


b 
B 
STX(“B) 
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ROM BIOS 


Listing 

CDFF 2E2E c dw (2Eh) # 100h + (2Eh) ; 52 34h 

CEO1 3E3E [a] dw (3Eh) * 100h + (3Eh) H > > 

CEO3 CDCD Cc dw KNONE * 100h + KNONE A None None 

CEO5 CDCD Cc dw kKNONE * 100h + KNONE : None None 

CEO7 2F2F Cc dw (2Fh) * 100h + (2Fh) ; 53 35h / / 

CEO9 3F3F Cc dw (3Fh) * 100h + (3Fh) H ? 3 

CEOB CDCD C dw kKNONE * 100h + KNONE ‘ None None 

CEOD CDCD (¢} dw kKNONE * 100h + kNONE ‘ None None 
c 
Cj rr ee een ne nne 
c Alphabetic (Non-Migratory) {Olivettil/Other | 
Cc 3 | KB ! KBs’ } 
Cf nn ne nn nn nn en en ne een ee en nee eee 
c 

CEOF CT7C7 (o dw kbrsh * 100h + kbrsh ; 54 36h RShft RShft 

CEI1 CT7CT c dw kbrsh * 100h + kbrsh ; RShft RShft 

CE13 CT7CT Cc dw kbrsh * 100h + kbrsh : RShft RShft 

CE15 CT1CT7 Cc dw kbrsh * 100h + kbrsh : RShft RShft 

CE17 2A2A Cc dw (2An) * 100h + (24h) ; 55 37h * * 

CE19 CBCB Cc dw kbprt * 100h + kbprt H PrtSe PrtSe 

CE1B 7200 c dw 7200h ; X114 

CE1D cCDCD c dw KNONE * 100h + kKNONE : None None 

CE1F cC4c4 Cc dw kbalt #® 100m + kbalt ; 56 38h ALT ALT 

CE21 c4c4 c dw kbalt # 100h + kbalt : ALT ALT 

CE23  C4C4 C dw kbalt #* 100h + kbalt ; ALT ALT 

CE25 cC4c4 c dw kbalt * 100h + kbalt A ALT ALT 

CE27 2020 ( dw (20h) # 100h + (20h) ; 57 39h SP SP 

CE29 2020 c dw (20h) # 100h + (20h) ;: SP SP 

CE2B 2020 c dw (20h) *® 100h + (20h) ; SP SP 

CE2D 2020 c dw (20h) * 100h + (20h) ; SP SP 

CE2F C1C1 c dw kbcap * 100h + kbcap ; 58 34h CapLk CapLk 

CE31 C1C1 c dw kbcap * 100h + kbcap ; CapLk CapLk 

CE33 C1C1 c dw kbcap *® 100h + kbcap ‘ CapLk CapLk 

CE35 C1C1 c dw kbcap * 100h + kbcap . CapLk CapLk 

CE37 3B00 Cc dw 3B00h > 59 3Bh F01=X59 

CE39 5400 c dw 5400h : Fii=X84 

CE3B 5E00 c dw 5E00h < F21=x94 

CE3D 6800 c dw 6800h ; F31=X104 

CE3F 3C00 (¢} dw 3C00h ; 60 3Ch FO02=X60 

CE41 5500 Cc dw 5500h ; F12=X85 

CE43 5F00 Cc dw 5F00h H F22=X95 

CE45 6900 c dw 6900h ; F32=X105 

CE47 3D00 c dw 3D00h ; 61 3Dh F03=X61 

CE49 5600 Cc dw 5600h : F13=X86 

CE4B 6000 c dw 6000h . F23=X96 

CE4D 6A00 c dw 6A00h : F33=X106 

CE4F 3£E00 c dw 3E00h ; 62 3Ehb FO4=X62 

CE51 5700 c dw 5700h ; F14=X87 

CE53 6100 c dw 6100h : F24=X97 

CE55 6BO00 c dw 6BO0h ; F34=X107 

CE57 3F00 c dw 3F00h ; 63 3Fh F05=X63 

CE59 5800 04 dw 5800h ; F15=x88 

CE5B 6200 c dw 6200h ; F25=x98 

CE5D 6C00 c dw 6COO0h : F35=X108 

CE5F 4000 Cc dw 4000h ; 64 4Oh FO06=X64 

CE61 5900 c dw 5900h : F16=xX89 

CE63 6300 c dw 6300h ; F26=X99 

CE65 6D00 c dw 6D00h : F36=X109 

CE67 4100 c dw 4100h ; 65 4th FO7=X65 

CE69 5A00 c dw 5A00h . F17=X90 

CE6B 6400 Cc dw 6400h ; F27=x100 

CE6D 6£00 c dw 6E00h ; F37=X110 

CE6F 4200 Cc dw 4200h ; 66 42h FO8=x66 

CE71 5 B00 Cc dw 5BO00h H F182X91 

CE73 6500 c dw 6500h ; F28=X101 

CE7T5 6F00 c dw 6FO0h ; F38=X111 

CE77 4300 c dw 4300h ; 67 43h F09=X67 

CE7T9 5C00 Cc dw 5C00h ; Fi9=X92 

CE7B 6600 Cc dw 6600h R F29=xX102 

CE7D 7000 Cc dw 7000h : F39=X112 

CE7TF 4400 c dw 4400h ; 68 44h F10=x68 

CE81 5D00 c dw 5D00h ;. F20=x93 

CE83 6700 Cc dw 6700h ; F30=X103 

CE85 7100 c dw 7100h . F40=X113 

CE87 C2Cc2 c dw kbnum * 100h + kbnum ; 69 45h NumLk NumLk 

CE89 C2C2 Cc dw kbnum * 100h + kbnum H NumLk NumLk 

CE8B CACA c dw pause * 100h + pause 7 Pause Pause 

CE8D C2C2 c dw kbnum * 100h + kbnum 7 NumLk NumLk 

CE8F C3C3 c dw kbscr * 100h + kbser ; 70 46h SerLk SerLk 

CE91 C3C3 Cc dw kbser * 100h + kbser : SerLk SerLk 

CE93 C9C9 Cc dw kbbrk * 100h + kbbrk H Break Break 

CE95 C3C3 c dw kbscr * 100h + kbser . SerLk SerLk 
Cc 
C jeer n nnn nen nn nn ee - -- e - -e 
Cc. # Numeric Keypad {Olivetti/Other | 
C 4 | KB | KBs | 
Co jeter n enn nn ene ee ee ee ee 
Cc 

CE97 4700 c dw 4700h >; 71 4Th Home=X71 

CE99 3737 c dw (37h) * 100h + (37h) ' 7 7 

CE9B 7700 Cc dw 7700h ‘ X119 

CE9D DODO c dw kdec7 * 100h + kdec7 : XDec7 XDec7 

CEO9F 4800 c dw 4800h 3; 72 48h Up =X72 

CEA1 3838 c dw (38h) * 100h + (38h) ; 8 8 

CEA3 CDCD c dw KNONE * 100h + KNONE H None None 

CEA5 CFCF c dw kdec8 * 100h + kdec8 7 XDec8 XDec8 

CEA7T 4900 Cc dw 4900h > 73 49h PgU p=X73 

CEA9 3939 C dw (39h) * 100h + (39h) ; 9 9 

CEAB 8400 c dw 8400h H X132 

CEAD CECE Cc dw kdec9 * 100h + kdec9 ; XDecg9 XDec9 


ROM BIOS 
Listing 


CEAF 2D2D C dw (2Dh) * 100h + (2Dh) ; 74 4Ah - - 
CEB1 2D2D c dw (2Dh) * 100h + (2Dh) ; = = 
CEB3 CDCD Cc dw kKNONE #® 100h + KNONE ; None None 
CEB5 CDCD Cc dw kKNONE * 100h + KNONE ; None None 
CEB7 4BOO C dw 4BOOh ; 75 4Bh Left=X75 
CEB9 3434 c dw (34n) * 100h + (34h) : 4 4 
CEBB 7300 Cc dw 7300h ; X115 
CEBD D3D3 C dw kdecy # 100h + kdec4 . XDec4 XDec4 
CEBF cCDCD C dw kKNONE # 100h + KNONE ; 76 4Ch None None 
CEC1 3535 Cc dw (35h) * 100h + (35h) H 5 5 
CEC3 CDCD c dw kNONE #® 100h + KNONE ‘ None None 
CEC5 D2bd2 c dw kdec5 * 100h + kdecd ; XDec5 XDec5 
CECT 4DO00 c dw 4DOOh ; 77 4Dh Rght=X77 
CEC9 3636 C dw (36h) * 100h + (36h) ; 6 6 
CECB 7400 Cc dw 7400h ; X116 
CECD D1D1 Cc dw kdec6 * 100h + kdec6 H XDec6 XDec6 
CECF 2B2B C dw (2Bh) * 100h + (2Bh) ; 78 4Eh + + 
CED1 2B2B C dw (2Bh) * 100h + (2Bh) ; + + 
CED3 cDCD Cc dw kKNONE # 100h + KNONE H None None 
CED5 cDCD Cc dw kKNONE * 100h + KNONE . None None 
CED7 4FOO C dw 4FOOh ; 79 4AFh End =X79 
CED9 3131 C dw (31h) * 100h + (31h) H 1 1 
CEDB 7500 Cc dw 7500h : X17 
CEDD D6D6 C dw kdect # 100h + kdec! ; XDec!1 XDec! 
CEDF 5000 Cc dw 5000h ; 80 50h Down=X80 
CEE1 3232 Cc dw (32h) * 100h + (32h) ‘. 2 2 
CEE3 cCDCD C dw kKNONE # 100h + KNONE ; None None 
CEE5 D5D5 Cc dw kdec2 * 100h + kdec2 : XDec2 XDec2 
CEET7 5100 Cc dw 5100h ; 81 5ih PgDn=X81 
CEE9 3333 Cc dw (33h) * 100h + (33h) H 3 3 
CEEB 7600 Cc dw 7600h : X118 
CEED D4D4 C dw kdec3 * 100h + kdec3 . XDec3 XDec3 
CEEF COCO C dw kbins * 100h + kbins ; 82 52h INS=X82 INS=X82 
CEF1 3030 Cc dw (30h) * 100h + (30h) ; 0 0 
CEF3 cCDCD Cc dw kKNONE * 100h + KNONE ; None None 
CEF5 DTDT7 Cc dw kdecO * 100h + kdecO ; XDec0 XDecd 
CEFT 5300 C dw 5300h « 63 53h DEL =X83 
CEF9 2E2E Cc dw (2Eh) * 100h + (2Eh) ; r F 
CEFB C8C8 c dw kbres * 100h + kbres H Reset Reset 
CEFD C8C8 Cc dw kbres * 100h + kbres ; Reset Reset 
Cc 
Cc fw een eee enn ene n samen ceccneananenaconcocen sere cen ecorrs 
Cc % Function Keypad |Olivetti|Other | 
¢ ; | KB | KBs | 
Co pre ne en enn nnn ene nner nen m mmm nnn nen nme neem e nn 
Cc 
CEFF D8D8 C dw kdblO * 100h + kdbl0O ; 84 54h 00 00 
CFO1 D8&D8 Cc dw kdblO * 100h + kdblO ; 00 00 
CFO3 cCDCD Cc dw kKNONE # 100h + KNONE ; None None 
CFO5 CDCD Cc dw kKNONE * 100h + KNONE ; None None 
CFO7 CBCB Cc dw kbprt * 100h + kbprt ; 85 55h PrtSc PrtSe 
CFO9 CBCB Cc dw kbprt # 100h + kbprt ; PrtSe PrtSe 
CFOB 7200 c dw 7200h : X114 
CFOD CDCD Cc dw kKNONE * 100h + KNONE ; None None 
CFOF CACA (s} dw pause * 100h + pause ; 86 56h Pause Pause 
CF11 CACA Cc dw pause * 100h + pause ; Pause Pause 
CF13 CACA Cc dw pause * 100h + pause ; Pause Pause 
CF15  CACA C dw pause * 100h + pause ; Pause Pause 
CF17 ODOD Cc dw (ODh) * 100h + (ODh) ; 87 57h CR CR 
CF19 ODOD C dw (ODh) * 100h + (0Dh) ; CR CR 
CF1B OAOA Cc dw (OAh) *® 100h + (OAh) ; LF LF 
CFiD CDCD Cc dw KNONE * 100h + KNONE ; None None 
CF1F 4B00 Cc dw 4BOOh ; 88 58h Left=X75 
CF21 7300 Cc dw 7300h + Rev Word = X115 
CF23 7300 Cc dw 7300h H Rev Word = X115 
CF25 17300 Cc dw 7300h ; Rev Word = X115 
CF27 5000 c dw 5000h ; 89 59h Down=X80 
CF29 5000 Cc dw 5000h ; Down=X80 
CF2B 5000 Cc dw 5000h ; Dow n=X80 
CF2D 5000 Cc dw 5000h ; Down=X80 
CF2F 4D00 C dw 4D00h ; 90 5Ah Rght=X77 
CF31 7400 C dw 7400h ; Adv Word = X116 
CF33 7400 Cc dw 7400h H Adv Word = X116 
CF35 7400 Cc dw 7T400h ; Adv Word = X116 
CF37 4800 Cc dw 4800h ; 91 5Bh Up =xXT72 
CF39 4700 Cc dw 4700h H Home=X71 
CF3B 4700 Cc dw 4700h : Home=X71 
CF3D 4700 c dw 4700h H Home=X7 1 
CF3F cC9C9 c dw kbbrk * 100h + kbbrk ; 92 5Ch Break Break 
CF41 cg9Cc9 Cc dw kbbrk * 100h + kbbrk : Break Break 
CF43 cgcg Cc dw kbbrk # 100h + kbbrk : Break Break 
CF45 cgcg C dw kbbrk * 100h + kbbrk ; Break Break 
CFAT cgcCcg C dw kbbrk *® 100h + kbbrk ; 93 5Dh Break Break 
CF49 cgCc9g c dw kbbrk * 100h + kbbrk ; Break Break 
CF4B cC9C9 C dw kbbrk # 100h + kbbrk ; Break Break 
CF4D Cc9C9 Cc dw kbbrk * 100h + kbbrk ; Break Break 
CF4F C2c2 Cc dw kbnum #* 100h + kbnum ; 94 5Eh NumLk NumLk 
CF51 C2C2 Cc dw kbnum * 100h + kbnum ; NumLk NumLk 
CF53  CACA Cc dw pause * 100h + pause ; Pause Pause 
CF55 C2c2 Cc dw kbnum * 100h + kbnum ; NumLk NumLk 
CF57 2F2F Cc dw (2Fh) * 100h + (2Fh) H 95 5Fh / / 
CF59 2F2F Cc dw (2Fh) *® 100h + (2Fh) ; 7 / 
CF5B cCDCD c dw kKNONE # 100h + KNONE ; None None 
CF5D cCDCD Cc dw kKNONE * 100h + KNONE ; None None 
CF5F 5400 c dw 5400h ; 96 60h F11=X84 
CF61 5400 C dw 5400h ; F11=X84 
CF63 5400 Cc dw 5400h : F11=x84 
CF65 5400 C dw 5400h H F11=X84 
CF67 5500 c dw 5500h ; 97 61h F12=X85 
CF69 5500 C dw 5500h ; F12=X85 
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ROM BIOS 
Listing 


CF6B 5500 
CF6D 5500 
CF6F 5600 
CF71 5600 
CF73 5600 
CF75 5600 
CF77 5700 
CF79 5700 
CF7B 5700 
CF7D 5700 
CF7F 5800 
CF81 5800 
CF83 5800 
CF85 5800 
CF87 5900 
CF89 5900 
CF8B 5900 
CF8D 5900 
CF8F 5A00 
CF91 5A00 
CF93 5A00 
CF95 5A00 
CF97 5B00 
CF99 5B00 
CF9B 5BO00 
CF9D 5B00 
CFOF 

CFOF 

CFOF 

= 0000 

= 0001 

= 0002 

= 0007 

= 0009 

= OOOF 

= 0010 

= 0011 

= 0012 

= 0014 

= 0014 

= 0007 

= 0O0B 

= 0011 

= OOFF 

= 0011 

= 0320 

= 0320 

= 0321 

= 0321 

= 0322 

= 0322 


Cc 
Cc 
Cc 
C 
c 
Cc 
Cc 
Cc 
c 
Cc 
c 
Cc 
c 
Cc 
c 
Cc 
Cc 
c 
Cc 
c 
c 
c 
c 
c 
c 
Cc 
c 
c 
c 
Cc 
Cc 
c 
c 
c 
Cc 
c 
c 
c 
c 
c 
c 
c 
c 
Cc 
c 
c 
c 
Cc 
c 
c 
c 
c 

c 
c 

c 
c 
c 
c 
c 
c 
c 
c 

€ 

c 

c 
c 

Cc 
c 

c 

c 
Cc 
c 
c 
c 
c 

c 

c 
Cc 
c 
c 
c 
c 

c 

c 

c 

Cc 

c 

c 

Cc 

Cc 
Cc 
Cc 
Cc 

c 

Cc 

c 

Cc 

c 

Cc 


dw 5500h ; F12=X85 
dw 5500h ; F12=X85 
dw 5600h ; 98 62h F13=X86 
dw 5600h . F13=X86 
dw 5600h R F13=X86 
dw 5600h . F13=X86 
dw 5700h ; 99 63h F14=X87 
dw 5700h : F14=X87 
dw 5700h ; F14=X87 
dw 5700h : F14=X87 
dw 5800h 3; 100 64h F15=x88 
dw 5 800h 7 F15=X88 
dw 5800h : F15=x88 
dw 5800h ; F15=X88 
dw 5900h ; 101 65h F16=X89 
dw 5900h ; F16=x89 
dw 5900h . F16=X89 
dw 5900h : F16=X89 
dw 5 A00h ; 102 66h F17=x90 
dw 5 A00h ; F17=X90 
dw 5A00h : F17=X90 
dw 5 A00h : F17=X90 
dw 5B00h ; 103 67h F18=X91 
dw 5B00h ; F18=X91 
dw 5B00h : F18=X91 
dw 5B00h ; F18=X91 
kb_datal endp 
code ends 
include hdu.asm 
pS SSS SSS Sssssssessssesessssssssseseessssssseseseeesseeseeeseeeeeeeee==- 
; Filename: hdu.sre 
’ 
. This module includes HDU support. 
’ 
pSSSSS SSS SSS sss sss ssssssssssseseessssesssssseeeeesseseesseseeeeree=e=22 
code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


; ####### COMMANDS AVAILABLE FROM INTERRUPT 13 ####### 


reset_int 
status_int 


read_int 
swrite_int 
;chktrk_int 
;fmttrk_int 
;fmtbad_int 
fmtdrv_int 


;read_param_ int 
assign _param_int 
;rlong int 
;swlong int 
;seek_int 
sreset2_int 
;Pbuff_int 
wbuff_int 


tst_drv_rdy_int 
recal_int 
ramdiag_ int 
;drvdiag int 
bxdiag int 


max_int 


equ 


equ 


equ 
equ 
equ 
equ 
equ 
equ 


equ 
equ 
equ 
equ 
equ 
equ 
equ 
equ 


equ 
equ 
equ 
equ 
equ 


equ 


00h 
Oth 


02h 
03h 
O4n 
05h 
06. 
O7Th 


08h 
09h 
Oah 
Obh 
Och 
Odh 
Oeh 
Ofh 


10h 
11h 
12h 
13h 
14h 


14h 


; ####### INT13 STATUS CODES ####### 


;reset disks (according to drive#) and 
; assign param 

;return status of last operation 
; (disk_status) in al 

;read sectors from disk 

;write sectors to disk 

;check track 

;format track 

Tolmer. vag crack 

;format drive starting at the 

H indicated track 


j;read the current drive parameters 
;assign parameters to drives 

jread long (512 data + 4 ecc) 
swrite long 

;seek cylinder 

;Same as OOh 

jread sector buffer 

jwrite sector buffer 


;test drive ready 

srecalibrate drive (seek track 00) 
;controller ram diagnostic 

;drive diagnostic 

;controller internal diagnostic 


;maximum interrupt command number 


; These are put into the disk_status byte in data_seg when there is an error. 


sreset_err 
init_err 
badtrack_err 
ecc_used_err 
sense_err 


equ 
equ 
equ 
equ 
equ 


05h 
O7Th 
Obh 
11h 
Offh 


;disk reset (int13-00) failed 
;assign parameter (int13-09) failed 
;bad track 

;ecce used to correct data 

srequest sense failed 


; ####### CONTROLLER INFORMATION ####### 


; drives_per_bx 
; drives_per_pe 
3 bxes_per_pe 

> ports_per_bx 
8 


ectors_per_track 


equ 
equ 
equ 
equ 
equ 


AN fFfreon 


1 


; ####### CONTROLLER PORTS ####### 


read_port 

write _port 
status_port 
reset_port 
switch_port 
select_port 


equ 
equ 
equ 
equ 
equ 
equ 


320h 
320h 
321h 
321h 
322h 
322h 


;Max number of drives on a controller 
jmax number of drives on a pe 

;max number of bxes on a pe 

jnumber of i/o ports for a controller 
;compatible fixed format 


;read data port 

swrite data port 

;read controller hardware status 
jwrite to reset controller hardware 
;read the drivetype switches 

swrite to select controller 
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= 0323 


= 0002 


= 0020 


0008 
0004 
0002 
0001 


0002 
0001 


0000 
0001 


0003 
0004 
0005 
0006 
0007 
0008 


OOOA 
O00OB 
000c 
000D 
OOO0E 
OOOF 


= OOEO 


0053 
OOE4 
OOE5 
00E6 


= 003F 


PAAAAQNAQMAAIAAIAAIVQAAIAAAAAAAAVRAVAAAAAAAANAAAAANAMDAAAAAAAANAAAAAAAANAAAAANAANAAAAAAAAAAAAAAAAAAGQ aa AAA AAAaAaaaad 


mask_port equ 323h 


jwrite to mask p_dma and interrupts 


; ####### CONTROLLER REGISTER BITS ####### 


; This is the completion status byte received in the read_port after 


; command completion. 


;completion_status: 
; h_ce_drive 
h_c_err 


equ 
equ 


OEOh 
002h 


. 
’ 


bits #7 to 5 


bit 


#1 


; This is the controller hardware status read from status_port. 


shdu_status: 
hdu_irg5 
; hdu_dreq3 
hdu_bsy 
hdu_ed 
hdu_io 
hdu_req 


equ 
equ 
equ 
equ 
equ 
equ 


020h 
010h 
008h 
004nh 
002h 
001th 


’ 
, 
. 
’ 
, 
, 
, 


; This is the controller p_dma and interrupt mask 


;mask_port_emd: mask_port_bank 
mask_port_inte 
mask_port_dmae 


equ 
equ 
equ 


008h 
002h 
001th 


; These are the bits for a drive in the switch. 


; switch _mask equ 


001 


10011b 


>; ####### CONTROLLER COMMANDS ####### 


bit #5 
bit #4 
bit #3 
bit #2 
bit #1 
bit #0 
written 
bit #3 
bit #1 
bit #0 


to mask_port. 


; The first byte of the cmd_block (CDB) is the controller command. 
; The upper 3 bits are the class (either 0 or 7, 
; The lower 5 bits are the opcode (0 to 31). 


; edb_O record class:3 
; Class 0 Controller Commands: 
tst_drv_rdy_bx equ 00h 
recal_bx equ O1h 

3; reserved O2h 
sense_bx equ 03h 
fmtdrv_bx equ O4h 
ehktrk_bx equ O5h 
fmttrk_bx equ 06h 
fmt bad_bx equ O7h 
read_bx equ 08h 

; reserved 09h 
write_bx equ OAh 
seek_bx equ OBh 
assign _param_bx equ OCh 
read_ece_ bx equ ODh 
rbuff_bx equ OEh 
wbuff_bx equ OFh 


; Class 7 Controller Commands: 


ramdiag_ bx equ OEOh 
; reserved OE1h 
; reserved OE2h 
drvdiag bx equ OE3h 
bxdiag bx equ OESh 
rlong_ bx equ OE5h 
wlong bx equ OE6h 


» OP 
000 


111 


code:5 


P2222b. 


222272b. 


; ####### CONTROLLER CDB BYTES ####### 


all reset or all set). 


; The remainder of the cmd_block bytes (CDB) are defined as follows: 


edb__1 record zzp:2, drivenum 


; edb__2 record cylhi:2 
3; cedb__3 record cyllow: 
; edb__4 record zzf:3, 

3 edb__5 record retry:1 


> ####### SENSE BYTES FOR REQUEST SENSE COMMAND ####### 


Pils 
» se 
8 
inte 


» us 


headnum:5 


enum :6 


rleave:5 


e_ecc:1, 


228:3, 


stepcode :3 


; Bytes returned when a request sense command is issued in response to an error. 


; sensed: senseO_val_addr 

; sense0_type 

: sense0_code 
senseO_msk 


; sensei: sensei_drive 
H sensei_head 


3; sense2: sense2_cylhi 
; sense2_sector 


; sense3: sense2_cyllow 


equ 
equ 
equ 
equ 


equ 
equ 


equ 
equ 


equ 


080h 
030h 
OOFh 
O3Fh 


020h 
01Fh 


OCOh 
03Fh 


OFFh 


; ####### HARD DISK PARAMETER TABLE ####### 


bit 


#7 


bits #5 & 4 
bits #3 to 0 
sense0O_type+sense0_code 


bit 
bits 


bits 
bit 


bits 


#5 
#4 


#7 
#5 


#7 
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0000 0132 

0002 O4 

0003 0132 

0005 0000 

0007 OB 

0008 05 

0009 oc 

OOOA By 

00OB 28 

000C 00 00 00 00 

0010 

= 0047 

= OO4B 

= 0003 

= 0007 

= 0082 

CFOF 

CFOF 33 CO 

CFA1 8E D8 

CFA3 8E CO 

CFA5S FA 

CFA6 C7 06 0034 R D62F R 
CFAC 8C OE 0036 R 

CFBO Ai OO4C R 

CFB3 A3 0100 

CFB6 Ai OO4E R 

CFB9 A3 0102 

CFBC C7 06 OO4C R D1AB R 
CFC2 8C OE OO4E R 

CFC6 C7 06 0064 R DOEO R 


WAP NAO MOANA AIS SOAATGGCAAITRA CAAGSIASAOGAGDAA Ee AAAS GAHAAaSHOOKNGgdacaooanAEGAdaahsSGanseoanaaaGhooenacessosns 


} This is a table which is indexed by the switch settings to determine 
; the parameters for each drive. 


parameter_table struc 


p_cyls dw 306d ;number of cylinders 

p_heads db 4d ;number of heads 

p_write_cur dw 306d ;reduced write current 

p_precomp dw od jwrite precompensation 

p_ece_len db 11d ;maximum ecc burst length 

p_control_ byte db 5d ;enable retry, enable ecc, 70Ousec steps 
p_timeout db Och ;standard timeout 

p_fmt_timeout db Ob4h ;timeout for format drive 

p_drvdiag timeout db 028h ;timeout for test drive ready 

p_zzj db 0,0,0,0 


parameter_table ends 


> ####### p_dma SYSTEM (8237) ####### 


read_mode equ 01000111b ;write to dma_mode 
3736 single mode 
3535 address increment 
p4:4 autoinit disable 
33:2 read 
31:0 channel 3 
write _mode equ 01001011b ;swrite to dma_mode 
736 single mode 
3535 address increment 
34:4 autoinit disable 
He tar write 
e150 channel 3 
allow_dma3 equ 00000011b jwrite to dma_mask_bit to allow 


disallow_dma3 equ 00000111b ;or disallow dma3 interrupt 


hdu_dma_segm equ 082h ;port sets top 4 bits of 20-bit p_dma address 


3 ####### MACROS #####4# 


; Input to a register from a port. 
; Won't work when the index has to cause a carry to high byte. 


inport macro inrg,inpt 


mov dx, inpt jget the port number for the base controller 

add dl,byte ptr ds:[port_off] ;add port_off for the correct bx 
in inrg,dx 

endm 


; Output from a register to a port. 


3; Ditto. 
outport macro outpt, outrg 
mov dx, outpt ;get the port number for the base controller 
add dl, byte ptr ds:[port_off] jadd port_off for the correct bx 
out dx, outrg 
endm 
p2esssss hd2.asm SSSSSSSSSSSSSSSSSSssssessssesessesesseeseseseees 
; Power on self test 
pS SSS SSS esssssssssssssssssssssesesesesssssesssssssssseteseeeereeezeeeee 


assume cs:code, ds:nothing, es:nothing, ss:nothing 
h_init proc near 
; Install vectors, 


assume cs:code, ds:abs0, es:abs0, ss:nothing 


xor ax,ax ; satisfy assumptions 

mov ds,ax ; ds = es = ax = abs0O_seg 

mov es,ax 

eli ; disable during critical code. 


; Install HDU hardware interrupt service routine. 


mov word ptr ds:[intODlocn+0000h],cs:(offset h_int) 
mov word ptr ds:[intODlocn+0002h],cs 


; Transfer old FDU int 13 vector to the new int 40 FDU location. 


mov ax,word ptr ds:[int13locn+0000h] 
mov word ptr ds:[(4#40h)+0000h],ax 
mov ax,word ptr ds:[int13locn+0002h] 
mov word ptr ds:[(4#40h)+0002h],ax 


; Install new HDU request int 13 vector. 


mov word ptr ds:[int13locn+0000h],cs:(offset h_io) 
mov word ptr ds:[int13locn+0002h],cs 


; Install new HDU boot-strap int 19 vector 


mov word ptr ds:[int19locn+0000h],cs:(offset h_boot) 
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Listing 
CFCC 8C OE 0066 R Cc mov word ptr ds:[int19locn+0002h],cs 
Cc 
( ; Install new int 41 HDU parameter table pointer 
Cc 
CFDO CT 06 0104 D14B R c mov word ptr ds:[(4#41h)+0000h],cs:(offset hdu_parm_tbl) 
CFD6 8C OE 0106 Cc mov word ptr ds:[(4#41h)+0002h],cs 
Cc 
CFDA FB c sti ; exit critical code. 
Cc 
c 
C 3; Initialize stuff in low memory. 
Cc 
Cc assume ecs:code, ds:data, es:abs0, ss:nothing 
C 
CFDB B8 0040 c mov ax, data_seg ; satisfy assumptions. 
CFDE 8E D8 c mov ds,ax 
Cc 
CFEO C6 06 0074 R 00 c mov byte ptr ds:[disk_status],0 ; clear errors. 
CFE5 C6 06 0075 R01 Cc mov byte ptr ds:(hf_nun],1 ; assume 1 hard disk. 
c 
C ; Reset the controller. 
Cc 
CFEA B9 OOOA Cc mov ex, 10 ;try to reset controller up to 10 times 
C 
CFED C init_controller_lp: 
c 
CFED 8A 16 0075 R c mov dl,byte ptr ds:(hf_num] ;get the current hd number 
CFF1 DO E2 C shl dl,1 ;make it look like 
CFF3 80 E2 FC Cc and d1,11111100b jan index 
CFF6 88 16 0077 R Cc mov byte ptr ds:[port_off],dl ;fake for reset_bx 
CFFA E8 D5B1 R Cc call reset_bx jreset that controller 
C 
C ; Set up dl to call int13. 
c 
CFFD B6 00 C mov dh,O ;clear dh 
CFFF 8A 16 0075 R Cc mov dl,byte ptr ds:(hf_num] ;number of HDUs (incremented in this 
Cc ; loop) 
DOO3 FE CA Cc dec dl ;compensate for zero-origin 
DOO05 80 CA 80 c or d1,80h ;flag as a hard disk number 
Cc 
C 3; Test the controller. 
Cc 
poogs BA 12 c mov ah, ramdiag_ int ;set up for int13 - controller ram test 
DOOA CD 13 c int 13h 
pooc 72 5C C je post_no_more_drives ;if error returned 
Cc 
DOOE B4 14 Cc mov ah, bxdiag_int ;set up for int13 - controller internal test 
Cc ; test 
D010 CD 13 c int 13h 
D012 72 56 C je post_no_more_drives ;if error returned 
Cc 
c 
C ; Set up p_timer for timeout of tst_rdy. 
C 
DO14 C7 06 006C R 0000 Cc mov word ptr ds:[(t_low_order],0#18 ; start counting at zero seconds 
(¢} ; t_low_order counts 
c ; 18times/sec. 
c ; Test system reset_flag. 
C 
DO1A 81 3E 0072 R 1234 Cc emp word ptr ds:[reset_flag],01234h ; test flag for reset function. 
D020 75 06 Cc jne init_start_timer ; skip if not CTL ALT DEL reboot 
Cc 
D022 C init_drive_lp: 
C 
D022 C7 06 006C R 0132 Cc mov word ptr ds:[t_low_order],17#18 ; only give 3 seconds if 
c ; warm boot or not first disk 
Cc ; t_low_order counts 
Cc ; 18times/sec, 
D028 C init_start_timer: 
Cc 
po28 FA Cc eli 
D029 «=E4 21 Cc in al,pic_1 ; get interrupt mask 
DO2B 24 FE c and al,OFEh ; un-mask p_timer interrupt IR0 
DO2D £6 21 Cc out pic_1,al ; set the controller 
DO2F_ FB Cc sti 
c 
D030 B4 09 Cc mov ah,assign_param_int ;assign drive parameters according to 
D032 CD 13 Cc int 13h ;switch settings on bx board 
D034 72 3B Cc je post_lose 
Cc 
D036 C init_try_drive: 
D036 B4 10 c mov ah, tst_drv_rdy_int jtest drive ready 
D038 CD 13 Cc int 13h 
DO3A 73 OB c jne init_drive_win 
DO03C 81 3E O06C R 0168 Cc emp word ptr ds:[t_low_order],20#18 ; t_low_order counts 
C . 18times/sec. 
DO42 72 F2 Cc jb init_try_drive ;if not given enough time yet, go back 
DO44 EB 24 90 c jmp post_no_more_drives ;if given enough time and still losing 
Cc 
DOAT C init _drive_win: 
DO47 =6BA 11 Cc mov ah,recal_int ;recalibrate drive 
DO49 CD 13 c int 13h 
DO4B 72 24 C je post_lose 
Cc 
c assume es:code 
Cc 
DO4D 8C C8 Cc mov ax,cs ;satisfy assumption 
DO4F 8E CO ce} mov es,ax 
D051 33 DB Cc xor bx, bx j;initialize offset (es:bx) 
c 


8-59 
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DO53 BY OF Cc mov ah,wbuff_int jwrite sector buffer as a test 
DO55 BO 01 c mov al,01 ;one block length 
DO57 CD 13 Cc int 13h 
D059 72 16 c je post_lose 
c 
Cc 
C ; Looks like we got another hard disk! 
c 
DO5B FE 06 0075 R c ine byte ptr ds:[hf_num] ;point to the next one 
DOSF FE C2 c ine dl sregister for calling int13 
D061 F6 06 0075 R 01 c test byte ptr ds:([hf_num],01h ;have we proceeded to a new controller? 
D066 74 BA (es jz init_drive_lp jno, go init second drive on this one 
D068 EB 83 C jmp init_controller_lp ;and go back . 
Cc 
C ; Come here when an attempt to initialize a drive or controller fails, 
C 3; If (at least) one good controller is found, then continue. 
Cc 
DO6A C post_no_more_drives: 
DO6A FE OE 0075 R c dec byte ptr ds:[hf_num] ;restore hf_num 
Cc 
DO6E EB 13 90 c jmp post_win ; could be FDU system only 
c 
C ; Come here if there was clearly an error during initialization. 
c 
DO71 C post_lose: 
DO71 FE OE 0075 R Cc dec byte ptr ds:[({hf_num] janticipation disproved 
c 
C ; Output an error message 
Cc 
C ;post_message: 
DO75 BD OOOF c mov bp,Ofh ;error flag 
DO78 BE DOA2 R c mov si,cs:(offset h_bad_m) ;string for error '1701' (HDU) 
DO7B E8 E5FA R c call DRomString ;display message on screen 
DO7TE E8 DOBB R c eall show_sense ;display the sense bits 
DO81 EB 18 c jmp short p_disp 
Cc 
D083 C post_win: 
D083 AO 0075 R Cc mov al,byte ptr ds:[(hf_nun] ; number of hard disks. 
D086 OA CO c or al,al ; are there any fixed disks. 
DOo8s 75 08 c jnz p_some 
c 
DO8A BE DOAE R c mov si,ces:(offset h_abs_m) ; message for no HDU 
DO8D F8 ES5SFA R c eall DRomString 
DO90 EB O09 c jmp short p_disp 
Cc 
DO92 C p_some; 
D092 «=6—E8 E650 R c call DHexNib ; display the number 
c 
D095 BE DOA6 R c mov si,cs:(offset h_good_m) ; message for 'HDU! 
D098 E8 E5FA R c call DRomString 
Cc 
c 
DO9B £E8 E619 R C p_disp: call DCrLf 
Cc 
DO9E E8 D5FA R c eall disable_disk_interrupts 
DOA1 C3 c ret 
c 
c 
DOA2 20 4E 6F 74 C h_bad_m db ' Not! ; Purposely no NULIJII! 
DOA6 20 52 65 61 64 79 C h_good_m db ' Ready ',NUL 
20 00 Cc 
DOAE 20 4E 6F 74 20 50 C h_abs_m db ' Not Present',NUL 
72 65 73 65 6E 74 Cc 
00 c 
c 
Cc 
DOBB C h_init endp 
Cc 
DOBB C show_sense proc near 
c 
C ; Displays the error sense code as (ab), where a is the type and b is the code. 
c 
DOBB B8 OE28 c mov ax, (OEH#100h)+'('! ;display a '(' 
DOBE CD 10 c INT 10h 
Cc 
DOCO AO 0042 R c mov al,byte ptr ds:[{hd_error] ;get the error code 
DOC3 24 3F Cc and al,sense0O_msk jisolate the type and code bits 
DOC5 E8 E643 R c call DHexByte ;display error type and code 
c 
DOC8 B8 OE29 Cc mov ax, (OEh#100h)+')! ;display a ')! 
DOCB CD 10 C INT 10h 
c 
DOCD C3 c ret 
c 
DOCE C show_sense endp 
Cc 
DOCE C maybe_show_sense proc near 
c 
C ; Show sense information if switch 8 is zero (closed) and 6 is one (open), 
C ; To be used for field maintenance, 
Cc 
DOCE 50 Cc push ax 
DOCF 80 3E 0074 R OO c emp byte ptr ds:[disk_status],0 
DOD4 74 11 Cc je m_exit ;if no error, do not display 
(¢ inport al,switch_port ;read the switches 
DOD6 BA 0322 C+ mov dx, switch_port ;get the port number for the base controller 
DOD9 O02 16 0077 R C+ add dl,byte ptr ds:[port_off] jadd port_off for the correct bx 
DODD EC C+ in al,dx 
DODE 24 AO c and al,0Oa0h jmask switches 8 and 6 
DOEO 3C 80 c emp al,080h jare they =10b? 
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DOE2 75 03 C jne m_exit 
Cc 
DOE4Y E8 DOBB R c eall show_sense ;if so, display sense 
c 
DOET C m_exit: 
DOE7T 58 c pop ax ;back to caller 
DOE8 C3 Cc ret 
DOEQ C maybe_show_sense endp 
c 
Cc ;=ssssss hd3.asm ee ee ee ee ee ee ee ee ee ee 
C 3; This is called from the ROM Bios after the hard disk has been initialized. 
C ; It attempts to read and initiate a master boot block from logical sector 0 of 
C 3; the floppy disk, and then from the hard disk. 
JSSSSSLSS SS SS SESS SASS SSH SSS SRS SSS SSH SSS SSS SSS SSS SSS SSS SSS SSS SSES SSS SSEE 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
DOE h_boot proc far 
; Install vectors. 
assume cs:code, ds:abs0, es:abs0, ss:nothing 
DOE9 33 CO xor ax, ax ; satisfy assumptions 
DOEB 8E D8 mov ds,ax ; ds = es = ax = abs0_seg 
DOED 8E CO mov es,ax 
DOEF FA eli ; disable during critical code. 


; Install new int 41 HDU parameter table pointer. 


mov word ptr ds:[(4#41h)+0000h],es:(offset hdu_parm_tbl) 
mov word ptr ds:[(4#41h)+0002h],cs 


DOFO C7 06 0104 D14B R 
DOF6 8C OE 0106 


; Install new FDU parameter table pointer. 


‘ mov word ptr ds:[int1Elocn+0000h],cs:(offset fd_parms) 
; mov word ptr ds:[int1Elocn+0002h],cs 
DOFA . FB sti ; exit critical code. 


; Attempt to reset the diskette. Motor startup time requires 3 tries. 


assume cs:code, ds:data, es:abs0, ss:nothing 


c 
Cc 
c 
Cc 
c 
Cc 
Cc 
Cc 
c 
Cc 
c 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
c 
c 
c 
c 
Cc 
c 
c 
C 
c 
Cc 
Cc 
Cc 
Cc 
DOFB B8 0040 to mov ax, data_seg ; satisfy assumptions. 
DOFE 8E D8& Cc mov ds,ax 
Cc 
D100 B9 0003 Cc mov 0x, 3 ;3 retries 
D103. +=B2 00 Cc mov d1,0 ;drive number zero (soft disk A:) 
Di05 E8 D1i2A R Cc call boot_a_disk ;try to boot from floppy 
D108 72 02 c je b_try_hdu ;failed - try the hard disk 
DIOA EB 13 Cc jmp short b_ok ;jump to the boot code if we succeded 
c 
C ; else boot from the hard disk. 
Cc 
D1i0C Cc b_try_hdu: 
D10C B9 0003 c mov Cx, 3 ;3 retries 
DiOF B2 80 c mov d1,80h ;drive number 80h (hard disk C:) 
D111 E8& D12A R Cc call boot_a_disk ;try to boot from hard disk 
D114 #72 OE C je b_failed j;if this failed too, then exit. 
Cc 
D116 0 «©.26: 81 3E 7DFE AA55 c emp word ptr es:[07C00h+510d],0AA55h jis it the code? 
D11D 75 05 c jne b_failed ;ecode tester 
Cc 
D1I1F C »b_ok: 
D11F 2E: FF 2E D126 R c jmp dword ptr cs:[boot_indirect ] ;jump to boot code if correct 
C 
D124 Cc b_failed: 
D124 CD 18 Cc int 18h ; initiate reboot through ROM BASIC INT. 
Cc 
D126 7000 C boot_indirect dw 07C00h ; jump indirect to boot code at 0:7C00 
D128 0000 Cc dw abs0O_seg 
Cc 
DI2A C h_boot endp 
Cc 
C 
D12A C boot_a_disk proc 
C 
C ; Set dl=disk number and call this proc. 
Cc ; It will reset and try to read cx times (in case there is a read error). 
Cc ; If it succeeds, it will return with CY=0. If it fails, it will leave CY=1. 
Cc 
D1I2A C blip: 
D12A B4 O00 c mov ah, reset_int jreset the disk 
D12c 6CD (13 c int 13h 
C 
DI2E 72 14 Cc je b_lost ;if the operation lost 
G 
D130 B4 02 c mov ah, read_int ;if it worked, read from the disk 
D132 BO 01 Cc mov als ;one sector 
Cc 
D134 BB 7C00 C mov bx,07C00h ;offset for the boot_area. 
c 
D137 «+51 Cc push ex ;save the retry count 
C 
D138 B5 00 c mov ch,0 ;ecylinder 0 
D13A B11 01 c mov el,1 ;sector 1 (lowest sector) 
D13C B6é 00 6 mov dh,0 ;head 0 
Cc 


8-61 


ROM BIOS 
Listing 


D14B 


D14B 
D14D 
DI4E 
D150 
D152 
D153 
D154 
D155 
D156 
D157 


D15B 
D15D 
DI5E 
D160 
D162 
D163 
D164 
D165 
D166 
D167 


D16B 
D16D 
DI6E 
D170 
D172 
D173 
D174 
D175 
D176 
D177 


D17B 
DI7D 
DITE 
D180 
D182 
D183 
D184 
D185 
D186 
D187 


D18B 
D18D 
DI8E 
D190 
D192 
D193 
DI94 
D195 
D196 
D197 


Di9B 
D19D 
DI9E 
D1A0 
Di A2 
D1A3 
D1A4 
D1A5 
D1A6 
DIAT 


D1 AB 


CD 13 


72 01 


80 FC 80 


00 00 00 00 


00 00 00 00 


00 00 00 00 


00 00 00 00 


28 
00 00 00 00 


0284 

05 

0080 

0080 

OB 

05 

oc 

By 

28 

00 00 00 00 


AAAAVAMVAAAAAAAAVAANIAAAAAANGDAAIANRAAAGAAAAAAANDAAAAAAAANANAAAAANAAANAAAAAAANMAAAAAAAAAANAAARDARAARAAAAAAAACAAAAAaAaaaa 


int 13h jattempt read 
pop cx ;restore retry count 
je b_lost ;if it worked, return to caller 
ret jreturn with no carry 
b_lost: 
emp ah, time_out ;if it was a timeout, 
loopne b_lp ;otherwise, another chance 
ste ;dropped through loop 
ret sreturn with carry 
boot_a_disk endp 


hdu_parm_tbl: 


; The next six are the supported drives: 


parameter_table <,2d,,,,00h> ;type 0: 5mb drive 
parameter_table <375d,8d,375d> jtype 1: 24mb drive 
parameter_table <,6d,128d,256d> ;type 2: 15mb drive 
parameter_table <> ;type 3: 10mb drive 

; (default) 
parameter_table <,2d,128d,306d> ;type 4: Syquest SQ306 
parameter_table <644d,5d,128d,128d> ;type 5: CDC Wren 


3 ...End of hard disk parameters, 
ye Szscss hd4.asm SSSSSSSSSSssSSSESsSSSSSSSStSsstqeqesseeezezzerz=ez=2 


h_io proc far 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


; Debugging code to display all calls to this procedure, 
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D1AB 
DIAE 
D1BO 


D1B2 
D1B2 


D1B5 
D1B5 
D1B6 
D1B9 
D1BB 


D1BD 
D1CO 


D1iC2 


D1C4 
D1C4 
D1C5 
D1C6 
DICT 
D1C8 
D1iCc9 
DICA 


F6 
15 
cD 


CA 


50 
B8 
8E 
58 


88 
80 


15 
E9 


C2 80 
05 
40 


0002 


FC 00 
09 
40 


FA 87 
FO 


00 


0040 
D8 


16 0076 R 
FC 01 


03 
D263 R 


Cc 
C 
C 
c 
C 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
c 
C 
C 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
c 
c 
Cc 
c 
c 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
C 
Cc 
c 
c 
c 
c 
C 
Cc 
c 
c 
Cc 
Cc 
C 
Cc 
c 
c 
c 
C 
C 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
Cc 
c 
Cc 
C 
Cc 
c 
Cc 
C 
Cc 
c 
Cc 
C 
c 
Cc 
C 
c 
Cc 
Cc 
C 
Cc 
c 
Cc 
Cc 
c 
Cc 
C 
Cc 
Cc 
Cc 
Cc 
Cc 


push 
mov 
call 
mov 
call 
eall 
pop 


test 
jnz 
int 


ret_from_40: 
ret 


ax 
al,ah 
DHexByte 
al, dl 
DHexNib 
DColon 
ax 


d1,080h 
hard_disk_int13 
40h 


hard_disk_int13: 


sti 
cmp 
jne 
int 


emp 


ja 
mov 


h_save_regs: 


ah,reset_int 
h_save_regs 
40h 


d1l,87h 
ret_from_40 


ah, reset_int 


push di 
push si 
push es 
push ds 
push bx 
Push cx 
push dx 
; Set up ds: segment. 
assume cs:code, ds:data, es:nothing, 
push ax 
mov ax, data_seg 
mov ds,ax 
pop ax 
mov byte ptr ds:[control_byte],dl 
cmp ah, status_int 
jne h_make_edb 
jmp status 


> Set up some of the CDB. 


h_make_cdb: 
dec 
mov 
mov 
mov 


push 
push 
call 
mov 
pop 
pop 
mov 


; Set up the 


mov 
and 
emp 
jae 


push 
shl 
and 
mov 
pop 


mov 
shl 
and 
or 

mov 


el 

byte ptr ds:[cemd_block+2], ol 
byte ptr ds:[cemd_block+3],ch 
byte ptr ds:[emd_block+4], al 


es 
bx 

get_drivetype vector 
al,es:[bx+p_control_byte] 

bx 

es 

byte ptr ds:[cmd_block+5],al 


ss 


; test HDU flag bit #7. 
; is this an HDU command? 
; if not, pass to the FDU driver 


; and then return, saving flags 
; @nable interrupts 
; is this a reset command? 


; if so, must reset FDU also 


; is the number absurd? 
; if so, return without HDU 


; perform a hard disk reset 


znothing 


; satisfy assumptions. 


;retain drive specifier 
jis it a status request? 


;treat as a special case 


;bx sectors are 0-16, not 1-17 
;cylinder-hi and sector 
;cylinder-low 

jinterleave or block count 


;point to parms for this drive 
jget the control byte 


sput it in the edb 


port_off with the port offset for the drive. 


al,dl 

al,O7Fh 

al,byte ptr ds:[hf_num] 
h_bad_command 


ax 
al,1 

al,11111100b 

byte ptr ds:[port_off],al 
ax 


cl, drivenum 

al,cl 

dh, (mask headnum) 

al, dh 

byte ptr ds:[(cemd_block+1],al 


; Set up an index to use the h_omd_table. 


emp 


ja 


mov 
shl 
shl 
mov 
add 
mov 


ah,max_int 
h_bad_command 


HDU drive number 

mask off HDU flag bit #7 
count of HDU's 

error if too high 


wee we we we 


;mMultiply by 2 
;provide port offset 
;store for use by port routine 


;shift for cdb drive# 
;get the bits for head number 


;share drive# with head number 
;Store into the drive/head byte 


shighest-numbered valid int13 command 
;error if out of range 


al,ah ;get the command code 
al,1 jmultiply command by 4... 
al,1 ;for indexing of table 
ah,o ;zero top 8 bits 


ax,offset h_cmd_table 
si,ax 


;now we point to the command in the table 
jwe'll use es:[si] to index the table 


eee SS SSS SSS secs sss sein SSS 
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D22A 
D22F 


D233 


D238 
D23D 


D242 
D242 
D245 


D248 
D24Cc 
D24F 


D250 
D251 
D252 
D253 
D254 
D255 
D256 


D257 


D25A 
D25A 
D25F 
D261 


D263 
D263 
D266 
D26B 


2E: 


C6 
EB 


00 


8A A4 0000 
26 0042 R 


8A 84 0003 
06 0074 R OO 
FF 94 0001 
D5FA R 
DOCE R 


26 OO74 R 
FC 01 


0002 


06 0074 R 01 
00 
DF 


0074 R 
06 0074 R 00 
D5 


0000 


00 


AAADAAAAADAAAARAAAAASAAAAAAAARAAAAARAAAAARAAAAANRNAARAANRQAARAARAAAAAARAAARAANRDAARAARAARAAARANAANANMRANANMRAANNAMAAANNAAARANNAMAAMAAMAAAMAANAARANNAANAARAANAANAAA 


; Now we can finish setup of the command. 


; If it's a p_dma operation, 


the command subroutine will be 


; called with al=p_dma mode byte for 8237. 


mov 
mov 


mov 


mov 
eall 


h_finish: 
call 
eall 


mov 
emp 
eme 


pop 
pop 
pop 
pop 
pop 
pop 
pop 


ret 


h_bad_command: 


mov 
mov 


jmp 


;get the opcode for the cdb 
jand put it in place 


ah,es:[si].bx_opcode 
byte ptr ds:[cmd_block+0],ah 
al,cs:{si].h_emd_mode_dma ;p_dma mode byte (read/write) 


byte ptr ds:[disk_status],0 ; clear errors. 
es:[si].h_emd_subr ;ecall subroutine to execute command 


disable_disk_interrupts 
may be_show_sense 


ah,byte ptr ds:[disk_status] ; get the status code from oper. 
ah,1 ; if nonzero, clear CF 
; now CF reflects error status. 


dx 
ex 
bx 
ds 
es 
si 
di 


2 ;return, preserving flags 


;bad command to int13 
;clear burst length 
sand exit 


byte ptr ds:[disk_status],cmd_error 
al,0 
h_finish 


; Special code for return_status. 


status: 
mov 
mov 


jmp 


; 


h_emd_struc 
bx_opcode 
h_cmd_subr 


h_cmd_mode_dma 


h_emd_struc 


; This is the table itself. 


h_cemd_table: 


h_emd_struc 


h_emd_struc 


h_cemd_struc 


h_cemd_struc 


h_emd_struc 


h_cmd_struc 


h_emd_struc 


h_emd_struc 


h_emd_struc 


h_emd_struc 


al,byte ptr ds:[disk_status] 
byte ptr ds:[disk_status],0 
h_finish 


jreturn status from last command 
jthis command was successful! 
j;and exit 


This is the structure for the table which allows command dispatch. 


struc 

db Oh jopeode for the bx (edb byte 0) 
dw Oh ;address of command routine 

db Oh ;code for 8237 read/write 

ends 


Each entry corresponds to a command. 


<assign_param_bx,assign_param> ;00 reset 

<Oh, Oh> 301 status 
<read_bx, h_dma, read_mode> ;02 read 
<write_bx, h_dma, write_mode> ;03 write 
<ehktrk_bx, h_ndma> 304 chktrk 
<fmttrk_bx, h_ndma> 305 fmttrk 
<fmtbad_bx, h_ndma> 306 fmtbad 
<fmtdrv_bx, h_ndma> ;07 fmtdrv 

<Oh, read_param> 308 read_param 
<assign_param_bx,assign_param> 309 assign_param 


D295 
D296 
D298 


D299 
D29A 
D29C 


D29D 
D29E 
D2A0 


D2A1 
D2A2 
D2A4 


D2A5 
D2A6 
D2A8 


D2A9 
D2AA 
D2AC 


D2AD 
D2AE 
D2B0 


D2B1 
D2B2 
D2B4 


D2B5 
D2B6 
D2B8 


D2B9 
D2BA 
D2BC 


D2BD 
D2BE 
D2co 


D2Cci 


D2Cc1 


D2c1 
D2c2 


D2cy 
D2C6 
D2c8 
D2CA 
peacc 


D2cE 
D2D0 


D2D3 


D2D5 
D2D7 


D2D9 
D2DB 


D2DD 
D2DF 
D2E1 


D2E3 


D2E6 
D2E8 
D2EA 
D2EC 


D2EE 
D2F0 
D2F2 
D2F4 


E5 
D2Cc1 R 
47 


E6 
D2C1 R 
4B 


OB 
D33E R 
00 


oc 
D504 R 
00 


OE 
D2C1 R 
47 


OF 
D2C1 R 
4B 


00 
D33E R 
00 


01 
D33E R 
00 


E0 
D33E R 
00 


E3 
D33E R 
00 


E4 
D33E R 
00 


FA 
E6 OB 


8c CO 
B1 04 
D3 CO 
8A ES 
24 FO 


03 D8 
80 D5 00 


E6 OC 


8A C3 
E6 06 


8A C7 
E6 06 


8A C5 
24. OF 
E6 82 


AO 0042 R 


3C E5 
T4 38 
3C E6 
TH 34 


3C OE 
T4 3A 
3C OF 
TH 36 


AQVAGAVQAAAAAURALQAGHAMAAAAAAAAAAAAAAEGHAAAAAAAAAARAAAAAADAQAAAABDAAAXAAQAAARAARQRAMAAAMAAANDAACAMDMAOAAAADADAANOAAAAeAGAGG 


h_emd_struc 


h_cemd_struc 


h_emd_struc 


h_emd_strue 


h_omd_struc 


h_emd_struc 


h_omd_struc 


h_emd_struc 


h_omd_struc 


h_omd_struc 


h_omd_struo 


h.i6 endp 
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<rlong_ bx, h_dma, read_mode> ;Oa rlong 
<wlong_bx, h_dma, write_mode> ;0b wlong 
<seek_bx, h_ndma> ;0c seek 

S<assign_param_bx,assign_param> ;Od reset 
<rbuff_bx, h_dma, read_mode> ;Oe rbuff 
<wbuff_bx, h_dma, write_mode> ;Of wbuff 


<tst_drv_rdy_bx, h_ndma> 


<recal_bx, h_ndma> 
<ramdiag bx, h_ndma> 
<drvdiag bx, h_ndma> 
<bxdiag bx, h_ndma> 


310 tst_drv_rdy 


311 recal 


312 ramdiag 


313 drvgdiag 


314 bxdiag 


; This procedure is called by int13 when a command requires a p_dma operation. 
; The al register should contain the h_omd_mode_dma,. 


h_dma proc 


oli 
out 


; Convert es:bx 


mov 
mov 
rol 
mov 
and 


add 
ado 


out 


mov 
out 


mov 
out 


mov 
and 
out 


nov 


j 
dma_mode, al H 


to an absolute 20-bit address for 


ax,es ‘ 
o1,4 ‘ 
ax, cl H 
ch, al ; 
al,O0fOh ; 


bx, ax 
oh,0 


dma_ff_clr,al ' 


al,bl 
dma_addr_3,al H 


al, bh 
dma_addr_3,al 


al,ch 
al,OFh 
hdu_dma_segm, al 


al,byte ptr ds:[omd_block+0] H 


; If it is a rlong or wlong, it's limited to one 


al,rlong bx ; 
h_dma_long 
al,wlong_ bx ; 
h_dma_long 


disable interrupts 
set the p_dma mode 


data. 


get es 

rotate 4 bits (#16) 

now it's aligned with bx 

save the top nibble of address 
clear low nibble 


add the offset of the address 
propagate CF (20-bit addition) 
ch = 20-bit address hi nibble 
bx = 20-bit offset of address 


clear the first/last ff 


output low byte of address 


output high byte of address 
restore top nibble of address 
mask the nibble 

to bank select register 


get command from omd_block 


block (516 chars) 
Note that if rlong or wlong is requested, the length is not checked. 


is command rlong_bx? 


is command wlong bx? 


; If it is a rbuff or wbuff, it's forced to one block (512 chars) 


; Set up the number of bytes for a normal command, 


Note that if rbuff or wbuff is requested, 


al,rbuff_bx ; 
h_dma_buff 
al,wbuff_bx ; 
h_dma_buff 


the length is not checked, 


is command rbuff_bx? 


is command wbuff_bx? 


8-65 


ROM BIOS 
Listing 


D2F6 80 
D2FB 77 
D2FD B1 
D2FF AO 
D302 D3 
D304 

D304 48 
D305 =E6 
D307 86 
D309 £6 
D30B 86 
D30D_ FB 
D30E 03 
D310 72 
D312~~=~&BO 
D314 «£8 
D317 «+72 
D319 BO 
D31B E6 
D31D £8 
D320 EB 
D322 

D322 «C6 
D327 =28B8 
D32A_ EB 
D32ac 

D32C «C6 
D331 + B8 
D334 = EB 
D336 

D336 =FB 
D337 = «=¥F9 
D338 C6 
D33D C3 
D33E 

D33E 

D33E BO 
D340 =E8 
D343—=Oo72 
D345 =—«EB 
D348 EB 
D34A 

D34A 

D34A 80 
D34F 75 
D351 C3 
D352 

D352 C6 
D357 ~+BO 
D359 «£8 
D35C 72 
D35E Bg 
D361 +=B8 
D364 8B 
D366 

D366 BY 
D368 £8 
D36B 72 
D36D BA 
D370 02 


3E 0046 R 80 
39 


06 0046 R 01 
0204 
D8 


06 0046 R 01 
0200 
CE 


06 0074 R 09 


02 
D3DD R 
05 


D43B R 
00 


3E 0074 R 00 
01 


06 0042 R 03 


APMAAQMAVDAQAAAIAAAAAAAAAAAAARAAAAANAANAAARAAAAAAAANANRAARANRAAAAAANAAAANAAAARAAAARARAAAAAAAAAAAAAAG 


+ 


cere Reker ecnr Rene eeckemerm sr) 


+ 


emp 


ja 


byte ptr ds:[emd_block+4],080h ; too many blocks requested? 
h_dma_err ; (64k RAM/512 bytes per sector) 


; Determine number of bytes to transfer. 


mov 
mov 
shl 


h_dma_len: 
dec 


out 
xchg 
out 
xchg 


sti 


add 
je 


e1,9h ; multiply 512 times 

al, byte ptr ds:[cmd_block+4] 3; ...block count 

ax,cl ; to make byte count 

ax ; ax = byte count - 1 
dma_count_3,al ; output low byte of count 
al,ah 

dma_count_3,al ; Output high byte of count 
al,ah 3; ax = byte count - 1 


; eritical code is over 


ax, bx ; compute last byte to transfer 
h_dma_err ; if carry flag set, overflow!! 


; Enable and allow interrupts from p_dma, and issue command. 


mov 
eall 
je 


mov 
out 


call 
jmp 


; For rlong and 


h_dma_long: 
mov 
mov 
jmp 


al, (mask_port_inte+mask_port_dmae) 


command ; send the cdb out to the bx 
h_err_chk ; return error 

al,allow_dma3 ; allow interrupts 
dma_mask_bit,al ; from the p_dma channel 
h_omd_wait ; wait for command completion 
short h_err_chk ; check for possible error 


wlong commands: 


byte ptr ds:[cemd_block+4],01h ; one block maximum 
ax,512d + 4d ; length of data + eac 
h_dma_len 


; For rbuff and wbuff commands: 


h_dma_buff: 
mov 
mov 
jmp 


h_dma_err: 
sti 
ste 
mov 
ret 


h_dma endp 


byte ptr ds:[cmd_block+4],01h ; one block maximum 
ax,512d ; length of data 
h_dma_len 


; @nable interrupts 
; set carry flag. 
byte ptr ds:[(disk_status],dma_seg error 


; This procedure is called by int13 when a non-p_dma command is requested. 


h_ndma proc 


mov 
eall 
je 


call 
jmp 


h_ndma endp 


h_err_chk 


emp 
jne 
ret 


al,mask_port_inte > allow bx interrupt at cmd completion 
command ; send the cdb out to the bx 

h_err_chk ; return error 

h_emd_wait ; wait for the command to complete 

short h_err_chk ; check for possible error 

proc 

byte ptr ds:[disk_status],0 ; check status flag from command 


h_had_err 
; no error - looking good 


; Perform request sense command same drive number. 


h_had_err: 
mov 
mov 
eall 
je 


mov 
mov 
mov 


e_read_sense: 
mov 
eall 


je 


inport 


mov 
add 


byte ptr ds:[cemd_block+0],sense_bx 


al,0 ; interrupt and p_dma for bx 
command ; send out the command 

e_lose ; sense command lost 

ex,4 ; accept 4 data + 1 status byte 
ax,0 

di,ax ; used as index of array 


ah, (hdu_bsy+hdu_io+hdu_req) 
wait_for_status 
e_lose 


bsy-cd+io+req 

wait for status byte ready 

jump if error 

al,read_port read data 

dx, read_port ;get the port number for the base controller 
dl,byte ptr ds:[port_off] jadd port_off for the correct bx 


ROM BIOS 
Listing 


88 85 0042 R 
E2 EA 


BY OF 
E8 D418 R 
72 50 


BA 0320 
02 16 0077 R 


A&B 02 
75 44 


AO 0042 R 
24 3F 
BB D4OF R 
2E 
A2 0074 R 
3C 11 
75 32 


o 
a 


C6 06 0042 R OD 
BO 00 

E8 D3DD R 

72 27 


BA OB 
E8 D418 R 
72 20 


BA 0320 

02 16 0077 R 
EC 

8A C8 


BY OF 
E8 D418 R 
72 OF 


BA 0320 

02 16 0077 R 
EC 

A& 02 

75 03 


8A C1 


C3 


E8 D504 R 

C6 06 0074 R FF 
F9 

C3 


BA 0321 
02 16 0077 R 


+ 


aaGAaAaAaaAXeaa 


aqaaaaa 
+ + + 


agaAgANNgANANANANNAANAAAAAA 


C+ 


C+ 


Q 
+ 


a aga 
+ 


h_ 


. 
tt 


h_ 


. 
’ 
. 
, 


in al,dx 
mov byte ptr ds:[hd_error+di],al ; store in array 

ine di 

loop e_read_sense 

mov ah, (hdu_bsy+hdu_cd+hdu_io+hdu_req ) ;bsy+cd+io+req 

call wait_for_status ; wait for status byte ready 

je e_lose ; jump if error 

inport al,read_port ; read the status byte 

mov dx, read_port ;get the port number for the base controller 
add dl, byte ptr ds:[port_off] sadd port_off for the correct bx 
in al,dx 

test al,h_c_err ; check status byte 

jnz e_lose ; leave if we had sense error 
mov al,byte ptr ds:[{hd_error+0] ; get first sense byte 

and al, sense0_msk ; isolate the type and code bits 
mov bx,offset bx_error_table 

xlat es:byte ptr bx_error_table ; get the dos error code 

mov byte ptr ds:[disk_status],al ; store the status 

emp al,ecc_used_err ; was it a correctable ece err? 
jne h_err_ret 3; if not, return 


Read ecc burst length. 


mov byte ptr ds:[emd_block+0],read_ecc_bx 
mov al,0 ; interrupt mask = no interrupts 
eall command 
je e_lose 
mov ah, (hdu_bsy+hdu_io+hdu_req ) ; bsy-cd+io+req 
eall wait_for_status 
je e_lose 
inport al,read_port ; read the burst length 
mov dx,read_port ;get the port number for the base controller 
add dl,byte ptr ds:[port_off] ;add port_off for the correct bx 
in al,dx 
mov el,al ; save it for a moment 
mov ah, (hdu_bsy+hdu_ced+hdu_io+hdu_req ) ;bsy+cd+io+req 
eall wait_for_status ; read the status byte 
je e_lose 
inport al,read_port 
mov dx, read_port ;get the port number for the base controller 
add dl,byte ptr ds:[port_off] sadd port_off for the correct bx 
in al,dx 
test al,h_ec_err ; check completion status 
jnz e_lose 
mov al,cl ; get burst length back 
err_ret: 
ret 


Sense failed. Try to recover. 


lose: 
call assign_param ;reset controller and assign parameters 
mov byte ptr ds:[disk_status],sense_err ;sense failed 
ste 
ret 
err_chk endp 


Send a CDB to the bx. 
The al register should be set to a mask_port_emd. 


command proc 
outport select_port,al ;select controller 
mov dx, select_port ;get the port number for the base controller 
add dl,byte ptr ds:[port_off] jadd port_off for the correct bx 
out dx,al 
outport mask_port,al ;allow interrupts and maybe p_dma 
mov dx,mask_port ;get the port number for the base controller 
add dl,byte ptr ds:[port_off] ;add port_off for the correct bx 
out dx, al 
mov ah, (hdu_bsy+hdu_cd+hdu_req ) jbsy+cd-io+req 
eall wait_for_status jwait for controller to setup for cmd 
je e_finish ;leave if timed out 
eld ;clear direction: count up with [si] 
mov si,ds:(offset emd_block) juse si as index 


send_cdb_byte: 


lodsb ;get a byte of cdb 
outport write_port,al ;send it to bx 
mov dx,write_port ;get the port number for the base controller 
add dl, byte ptr ds:[port_off] ;add port_off for the correct bx 
out dx, al 
mov ex,0 ;prepare for loop 
c_wait: 
inport al,status_port ;echeck status 
mov dx, status_port ;get the port number for the base controller 
add dl,byte ptr ds:[port_off] 3;add port_off for the correct bx 
in al,dx 
test al,hdu_req jis status valid? 
loopz c_wait swait for valid or timeout 
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D410 24 07 Cc and al,O7h ;mask low 3 bits Nd 
D412 3C 05 Cc cmp al, (hdu_cd+hdu_req) jis it still looking for cd+out? 
D414 74 E2 Cc je send_cdb_byte ;yes - go send another byte 
D416 «=F8 c cle 
D417 C c_finish: 
D417 C3 Cc ret ;done sending all bytes, so return 
Cc 
D418 C command endp 
Cc 
C 3; Wait for status from bx (specified in ah), or else time out. 
c 
D418 C wait_for_status proc 
Cc 
D418 50 c push ax 
D419 «51 c push ex 
D41A BY 0000 c mov ex,0 
D41D C r_waiting: 
Cc inport al,status_port ;read bx status 
D41D BA 0321 C+ mov dx, status_port ;get the port number for the base controller 
D420 02 16 0077 R C+ add dl,byte ptr ds:[(port_off] jadd port_off for the correct bx 
D424 EC C+ in al,dx 
D425 AB O01 c test al, hdu_req jlook for validity of status 
D427 =E1 F4 c loopz r_waiting sloop if not valid yet 
D429 24 OF c and al,Ofh ;get low 4 bits 
D42B 3A C4 c cmp al,ah ;test for the specified status 
D42D 74 09 Cc je bx_ready 
Dh2F C6 06 0074 R 80 c mov byte ptr ds:[disk_status],time_out ;took too long to select 
D434 F9 c sto ;flag error 
D435 C r_finish: 
D435 59 Cc pop ex 
D436 «(58 c pop ax 
D437 C3 Cc ret 
C 
D438 C bx_ready: 
D438 F8 c ele ;got the req 
D439 &§EB FA Cc jmp r_finish 
D43B C wait_for_status endp 
Cc 
C 3; Wait for a command to complete. 
Cc 
D43B C h_cemd_wait proc 
Cc : | 
D43B «FA c oli 
D43C ER 21 c in al,pic_i ; get interrupt mask 
D43E 24 DF c and al,ODFh ; un-mask HDU interrupt IR5 
D440) 66 21 Cc out pic_i,al ; set the controller 
D442 FB Cc sti 
Cc 
Cc assume es:abs0 
Cc 
D443) 33 :«CO0 Cc xor ax, ax 3; @S = ax = absO_seg 
DS45 8E CO c mov es,ax ; @s points to absO_seg segment 
D447 26: Ch 36 0104 Cc les si,dword ptr es:[((4#41h)] ; es:si points to hdu_parm_tbl 
(¢} 
c assume es:nothing 
Cc 
C ; Determine timeout count. 
Cc 
D44C BT 00 c mov bh,0 ;zero top byte of count 
DS4XE 26: 8A 5C 09 C mov bl,es:byte ptr [si]. p_timeout ;standard timeout 
D452 80 3E 0042 R O04 Cc emp byte ptr ds:(emd_block+0],fmtdrv_bx ;but is it a format 
Cc ;drive command? uv 
D457 75 O7 c jne wi 
D459 26: 8A 5C OA c mov bl,es:byte ptr [si].p_fmt_timeout ;fmtdrv timeout 
D45D EB OC 90 c jmp w2 
D460 C wit: 
D460 80 3E 0042 R E3 C cmp byte ptr ds:[emd_block+0],drvdiag bx ;but is it a drive 
Cc ;diagnostic? 
D465 75 04 c jne w2 
D467 26: 8A 5C OB c mov bl,es:byte ptr [si].p_drvdiag timeout ;drvdiag timeout 
c 
C ; Now we can wait for the interrupt. 
c 
D46B C w2: 
D46B D1 £3 Cc shl bx, 1 ;double the timeout for the 
c 38086. 
c 
D46D C wait_for_irg5: 
c inport al,status_port 
D46D BA 0321 C+ mov dx, status_port ;get the port number for the base controller 
D470 02 16 0077 R C+ add dl,byte ptr ds:[port_off] jadd port_off for the correct bx 
D474 EC C+ in al,dx 
D475 A8& 20 c test al,hdu_irg5 jwas there an interrupt yet? 
D477 75 OD Cc jnz w_its_done 
D479 E2 F2 c loop wait_for_irg5 
c 
D47B 4B Cc dec bx ;outer timing loop 
D47C 75 EF Cc jnz wait_for_irg5 
Cc 
D47E C6 06 0074 R 80 c mov byte ptr ds:[disk_status],time_out ;we fell through 
D483 EB OF 90 Cc jmp w_finish 
Cc 
D486 C w_its_done: 
C inport al,read_port jread status byte 
D486 BA 0320 C+ mov dx,read_port ;get the port number for the base controller 
D489 02 16 0077 R C+ add dl,byte ptr ds:[(port_off] jadd port_off for the correct bx 
D48D EC C+ in al,dx 
D48E 24 02 Cc and al,h_c_err ;@et completion error bit 
D490 08 06 OO74 R (3 or byte ptr ds:[disk_status],al shlerr_chk will look at it 
c 
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D494 C w finish: 
D494 BO 00 Cc mov al,0 ;turn off controller interrupts 
c outport mask_port,al 
D496 =BA 0323 C+ mov dx,mask_port ;get the port number for the base controller 
D499 O02 16 0077 R C+ add dl, byte ptr ds:[port_off] jadd port_off for the correct bx 
D49D EE C+ out dx, al 
c 
D49E C3 Cc ret 
C 
D4OF C h_omd_wait endp 
c 
D49OF C h_datal proc 
c 
D4OF C bx_error_table: 
C ; Type O errors 
D49F 00 20 40 20 (¢} db 0, fdec_error, seek_error, fdc_error 
D4A3. =©80 00 20 00 Cc db time_out, 0, fde_error, 0 
D4A7T 40 00 00 00 c db seek_error, 0, 0, 0 
D4AB 00 00 00 00 c db 0, 0, 0, 0 
C ;Type 1 errors 
D4AF 10 10 02 00 c db erc_error, erc_error, addr_mark_error, 0 
D4B3. O4 40 00 00 c db sect_not_found, seek_error, 0, 0 
D4B7 11 0B 00 00 c db ecc_used_err, badtrack_err, 0, 0 
D4BB 00 00 00 00 c db O14 0%, Os 10 
Cc ;Type 2 errors 
DSBF 01 02 00 00 Cc db emd_error, addr_mark_error, 0, 0 
DAC3 oc [ c db 12 dup(0) | 
00 Cc 
] C | 
Cc 
C ;Type 3 errors 
D4CF 20 20 10 00 c db fde_error, fdc_error, crc_error, 0 
DAD3 oc [ Cc db 12 dup(0) 
00 c 
] Cc 
c 
: c 
DADF C h_datal endp 
Cc 
Cc szessses hd5.asm SSSSSSSSSSSSSSSSRSSSHARSSSSSSSSSSSSSSSSESSSSSSEL=S 
Cc 
DADF C read_param proc 
f D4DF 06 Cc push es ;save caller's es: register 
| D4¥EO E8 D5C1 R c call get_drivetype_vector jloads es with pointer & bx with offset | 
Cc i 
D4E3 26: 8B OF c mov ex,es:[bx].p_cyls ;get number of cylinders 
DXE6 83 EQ 02 Cc sub ex,2d ;Subtract 2: zero origin and diag track 
D3E9 86 EQ Cc xehg ch,cl ;put low-order in ch 
D3EB DO C9 c ror ol,1 ;put high-order 2 bits | 
D4ED DO C9 Cc ror cel,1 jin top of el 
D&EF 80 C9 11 Cc or el, sectors_per_track ;fixed, not variable 
Cc 
D4F2 26: 8A 77 02 c mov dh,es:[bx].p_heads jnumber of heads 
D4F6 FE CE c dec dh ;zero origin 
Cc 
D4F8 8A 16 0075 R c mov dl,byte ptr ds:{hf_num] ;count of hard disks 
c 
D4FC O07 c pop es 
c 
Cc 
D4FD 58 Cc pop ax ;save the return address 
D4FE 5B c pop bx ;trash the dx 
D4FF 5B c pop bx sand cx from the caller 
Cc 
D500 51 c push ex ;push new parameters 
D501 52 Cc push dx ;for caller to receive 
D502 50 Cc push ax ;replace return address 
Cc 
D503 C3 c ret 
D504 C read_param endp 
Cc 
C 3; Perform a reset and assign parameters for the drives. 
C ; Note: parameters must be assigned for BOTH drives on the chosen controller. 
Cc 
D504 C assign_param proc 
Cc 
D504 E8 D5B1 R c eall reset_bx 
C 
D507 06 Cc push es 
Cc 
D508 C6 06 0042 R OC Cc mov byte ptr ds:[cemd_block+0],assign_param_bx ;set cdb 
D50D C6 06 0043 R 00 Cc mov byte ptr ds:[emd_block+1],0 jassume drive 0 
D512 80 26 0076 R FE (9; and byte ptr ds:[control_byte],0feh 
D517 §E8 D532 R Cc call assign_param_1 jassign params 
D51A 72 14 c je ap_finish ;jump if OK 
Cc 
D51C O7 Cc pop es 
D51D 06 Cc push es 
Cc 
D51E C6 06 0042 R OC c Mov byte ptr ds:[cemd_block+0],assign_param_bx ;set cdb 
D523 C6 06 0043 R 20 Cc mov byte ptr ds:[emd_block+1],(mask drivenum) jassume drive 1 
D528 80 OE 0076 R01 c or byte ptr ds:[control_byte],01h 
D52D E8 D532 R Cc eall assign_param_1 ;assign params 
Cc 
D530 C ap_finish: 
D530 O7 C pop es 
D531 C3 Cc ret 
(¢ 
D532 C assign_param endp 
Cc 
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c 
D532 C assign_param_1 proc 
D532 &BO O00 Cc mov al,0 ;no interrupts desired 
D534 E8 D3DD R c call command ;send the edb 
| D537 72 63 Cc je a_finish 
Cc 
C ; Send the 8 bytes of drive parameters as PIO. 
Cc 
D539 E8 D5C1 R C eall get_drivetype_vector ;snare pointer to the table 
Cc 
C 3; send msb before lsb 
Cc 
D53C 26: 8A 47 01 Cc mov al,es:byte ptr [bx].p_cyls+1 
D540 E8 D59D R c call data_out 
D543 72 57 c je a_finish 
Cc 
D545 26: 8A 07 C mov al,es:byte ptr [bx].p_cyls 
D548 E8 D59D R c call data_out 
D54B 72 4F Cc je a_finish 
| Cc 
D54D 26: 8A 47 02 Cc mov al,es:[bx].p_heads 
D551 + E8 D59D R c eall data_out 
D554 72 46 c je a_finish 
Cc 
D556 26: 8A 47 04 c mov al,es:byte ptr [bx].p_write_cur+1 
D55A E8 D59D R C eall data_out 
D55D 72 3D c je a_finish 
c 
D55F 26: 8A 47 03 Cc mov al,es:byte ptr [bx].p_write_cur 
D563 E8 D59D R Cc eall data_out 
D566 72 34 c je a_finish 
Cc 
D568 26: 8A 47 06 Cc mov al,es:byte ptr [bx].p_precomp+1 
D56C E8 D59D R Cc call data_out 
D56F 72 2B c je a_finish 
c 
D571 26: 8A 47 05 Cc mov al,es:byte ptr [bx].p_precomp 
D575 E8 D59D R c eall data_out 
D578 72 22 c je a_finish 
c 
D57A 26: 8A 47 OT c mov al,es:[bx].p_ecc_len 
D57E E8 D59D R c call data_out 
D581 Ta. 19 Cc je a_finish 
Cc 
C ; Note that control byte is handled differently... See near h_make_cdb. 
Cc 
D583 +B4 OF ¢ mov ah, (hdu_bsy+hdu_ced+hdu_io+hdu_req ) ;bsy+cd+io+req 
D585 E8 D418 R c eall wait_for_status 
D588 72 12 Cc je a_finish 
C 
Cc inport al,read_port jread the status byte 
D58A BA 0320 C+ mov dx,read_port ;get the port number for the base controller 
| D58D 02 16 0077 R C+ add dl,byte ptr ds:[port_off] jadd port_off for the correct bx 
D591 EC C+ in al,dx 
D592 A8& 02 c test al,h_c_err ;did we do ok? 
D594 74 06 Cc jz a_finish 
D596 C6 06 0074 R 07 (0) mov byte ptr ds:[disk_status],init_err ;no 
D59B FY c sto 
Cc 
D59C C a_finish: 
D59C C3 Cc ret 
c 
D59D C assign_param_1 endp 
c 
C 3; Send a byte of data out the write_port. 
c 
D59D C data_out proc 
c 
D59D 50 Cc push ax 
D59E B4 09 c mov ah, (hdu_bsy+hdu_req) ;bsy-cd-io+req 
D5A0 E8 D418 R c eall wait_for_status 
D5a3. «58 (a pop ax 
D5A4 73 01 c jne do_ready ;if it didn't time out, output the data 
D5A6 C3 c ret 
Cc 
D5AT7 C do_ready: 
c outport write_port,al jwrite it out 
D5A7 BA 0320 C+ mov dx,write_port ;get the port number for the base controller 
D5AA O02 16 OO77 R C+ add dl,byte ptr ds:[(port_off] ;add port_off for the correct bx 
D5AE EE C+ out dx, al 
DS5AF F8 c ele ;no problem 
D5BO C3 Cc ret 
Cc 
D5B1 C data_out endp 
c 
D5B1 C reset_bx proc 
Cc 
c outport reset_port,al jreset controller 
D5B1 BA 0321 C+ mov dx,reset_port ;get the port number for the base controller 
D5B4 02 16 0077 R C+ add dl,byte ptr ds:[port_off] ;add port_off for the correct bx 
D5B8 EE C+ out dx, al 
D5B9 51 c push ex 
D5BA BY 0100 Cc mov ex,100h jwait in a loop 
D5BD £E2 FE Cc loop $ 
D5BF 59 c pop ex 
D5CO C3 c ret 
D5C1 C reset_bx endp 
Cc 
C ; Returns with es:[bx] pointing to the drivetype vector for the selected drive. 
Cc 
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The bits are selected from the switch as follows: 


; 
; 
; switch CT hed st epee pe bor } Be 4 
; bit 0 1 2 3 4 5 6 7 
: drive 0 0 1 2 3 
; drive 1 0 1 2 3 
H 
get_drivetype_vector proc 
push ax 
assume es:abs0 
xor ax, ax ; @S = ax = absO_seg 
mov es,ax ; @s points to abs0_seg segment 
les bx, dword ptr es:[(4#41h)] ; es:bx points to hdu_parm_tbl 
assume es:nothing 
push dx 
inport al,switch_port ;read switches on controller board 
mov dx, switch_port ;get the port number for the base controller 
add dl,byte ptr ds:[port_off] ;add port_off for the correct bx 
in al,dx 
pop dx 
and al,O07fh jignore top switch! 
test byte ptr ds:[control_byte],01h jwas this controller drive one? 
jnz g@_mask 
shr al,1 ;to get drive zero, 
shr al,1 ;Sshift twice right 
@ mask: 
and al,00110011b ;get switch _mask bits for this drivetype 
mov ah,al ;get top two bits from bits 4&5 
shr ah,1 j.e-into bits 2&3 
shr ah,1 
or al,ah ;combine with low 2 bits 
shl al,1 ;multiply by 16 for offset in table 
shl al,1 
shl al,1 
shl al,1 
mov ah,0O 
add bx, ax jadd offset to base of param table 
pop ax 
ret 
get_drivetype_vector endp 


disable_disk_interrupts proc 


; Disables interrupts from all bx controllers on the system. 


push dx 
push cx 
push ax 
push ds 


; Set up ds: segment. 


assume ds:data 


mov ax, data_seg ; Satisfy assumptions. 
mov ds,ax 

eli 

in al,pic_1 5 wet interrupt mask 
or al,020h ; turn off IR5 

out pic_i,al ; and set the new mask 
sti 

mov ch,0 

mov el, byte ptr ds:(hf_num] j;number of drives 

ine cx jmake it into 

shr OX; 1 }s..number of controllers 
jz v_disallow jif zero, disallow 


v_reset_bx: 


Reset 


controller cx by sending mask byte. 


mov al,0 ;mask to impose on bx 

mov dx, cx ;get controller number 

dec dx swe go from 0-3, not 1-4 

shl dx,1 ;make it an offset (4 ports/bx) 
shl dx,1 

add dx,mask_port ;now bx=-> controller 

out dx, al 

loop v_reset_bx 


v_disallow: 


mov al,disallow_dma3 ;command to turn off dma3 interrupts 
out dma_mask_bit, al ;send it 


assume ds:nothing 
pop ds 
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D62F 
D62F 
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D634 
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pop ax 
pop cx 
pop dx 
ret 


disable_disk_interrupts endp 


. 


This is run when the hard disk causes an interrupt due to command completion. 


h_int proc 


push ax 
mov al, pic_neoi ;command for 8259 
out pic_0O,al 
mov al, disallow_dma3 ;command for 8237 
out dma_mask_bit,al 
in al,pic_i ; get interrupt mask 
or al,020h ; turn off IR5 
out pic_i,al ; and set the new mask 
pop ax 
iret 
h_int endp 
pesessss dtcfmt.asmn Sesssesesessessessssssssssssssesssessessesssesses 
; HDU Physical Formatting Utility 
3 
; Formatting utility to perform physical format of hard disk drive 
3; using DTC-5150BX controller. Calls int 13h to provide disk services. 
; 
; Use this program when you first use a new disk. Then use FDISK and 
; FORMAT programs to finish the job. 
; 
; The user can supply an argument number for any hard disk on the systen. 
; ex: tsdrive c, 2=drive d. 
PS SSSSSSS SSS SSS SSS SSS SS SSS SSS SS SS SS SSS SS SSS SS SS SS SSS SSS SSSSSSSSSSSSSSTE 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
h_fmt proc near 


. 
’ 


i 


Write greeting and prompt for drive number. 
Drives are numbered the same way as in the industry standard "FDISK" utility. 


mov si,es:(offset h_intro_m) ;greeting string 

eall DRomString 

xor ah,ah * ah sO. 

INT 16h ; get a keystroke. 

cmp al,'q' ;check for quit code 

je finished ;eject if user typed a Q 

emp aL,.*Q* 

je finished 

call DCrLf 

sub al, "1" ; range should be '1' to '8! 
je no_hard_disk ; if negative, incorrect number 
or al,080h ; set HDU flag bit #7. 

mov dl,al ; prepare drive code for int13 


Create a 512 byte sector buffer of 6Ch in RAM (on the stack!). 


eld ; clear direction flag. 

push es ; save registers. 

push ss 

pop es ; es gets ss. 

sub sp,512 ; make room on stack! 

mov di,sp es:di points to stack buffer. 


’ 
mov ax,06C6Ch ; word fill pattern. 
mov ex, (51272) ; number of words to fill. 
rep stosw ; fill stack buffer. 
; di saves original stack pointer 


Write the stack sector buffer with the 06Ch code to fill data fields on drive. 


mov ax, (wbuff_int#100h)+1 ; Prepare for write sector of 1 buffer. 

mov bx, sp ; es:bx points to stack buffer (of 06Ch) 
; ex is zero. 

mov dh,O ; clear head number. 

INT 13h ; call for write sector buffer 

mov sp,di ; restore original stack pointer. 

pop es ; restore registers. 

je no_hard_disk ; error writing sector buffer 


Print message that we are formatting the drive. 


D6CB 


D6FF 
D701 


D733 


D750 


D765 


D784 


D7BT7 


D7CD 


maw 


c 
c 
c 
Cc 
Cc 
c 
Cc 
Cc 
C 
c 
c 
c 
c 
Cc 
c 
Cc 
c 
c 
Cc 
Cc 
Cc 
Cc 
c 
C 
c 
C 
c 
Cc 
c 
c 
c 
Cc 
c 
c 
Cc 
Cc 
c 
c 
Cc 
c 
c 
c 
Cc 
c 
Cc 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
Cc 
c 
c 
c 
c 
C 
c 
c 
c 
C 
C 
Cc 
Cc 
c 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
C 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
C 
Cc 
Cc 
C 
C 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
Cc 
C 
C 
Cc 


mov 
call 


si,cs:(offset h_fmt_m) 
DRomString 


; Format the drive, 


mov 
mov 


ax, (fmtdrv_int#100h) +6 
ex,01h 


; Note that dx is retained from above. 


INT 
je 


mov 
call 


finished: 


eall 
ret 


no_hard_disk: 
mov 
call 
jmp 


format_error: 
mov 
call 


mov 
eall 


jmp 
h_fmt endp 
h_data2 proc 


h_intro_m 


h_fmt_m 


h_pass_m 


h_none_m 


h_err_n 


h_data2 endp 


13h 
format_error 


si,cs:(offset h_pass_m) 
DRomString 


DCrLf 


si,cs:(offset h_none_m) 
DRomString 
short finished 


si,cs:(offset h_err_m) 
DRomString 


al,ah 
DHexByte 


short finished 
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;text for informational message 


; format drive with interleave of 6 
; Start with sector zero 


; format the drive 
; problem during format 
; return to caller 


;give error message 


pexit 


;give error message 


; Print error code in ah 


db 'Fixed Disk Formatting Utility',CR,LF 

db "All data on the specified fixed disk will be erased,'! 
db CR, LF 

db ‘Enter fixed disk number (1 to 8) or "Q" to quit: ',NUL 
db CR,LF,'Formatting Fixed Disk...',CR,LF,NUL 

db ‘Format is complete.',CR,LF 

db "Proceed with FDISK and FORMAT.',NUL 

db ‘Error: No fixed disk drive exists for this number.',NUL 
db "Format Error. Code: ',NUL 


ROM BIOS 


Listing 
D7CD C code ends 
C include graph.asm 
c 
Cc pSSS SSS SS SS SS SSS SSS SS SSS SSS SSS SSS SSS SSSSSSSSSSSSSSSSSSSS SSS SSS SSS SS SSS SSS SSSSsse 
Cc. Filename: graph.sre 
Cc 5 
Cc This module includes the four graphics functions for INT 10h. 
Cc 3 
Cc 3 
Cc pS SSSSSSSSSS SSS SSS SSS SSS SSS SSS SSS SSS SSSSSSSSSSSSSSSSSSSSSSSSSSSSS TSS SSS SS SSS SSSS 
C 
C page 
Cf a nnn scsse 
G 4 INT 10h Graphics Support 
Cc 
Cc 3 Must preserve bx, cx, dx and return values in ax 
c 3 
Cc 3; All other registers are saved and restored by video dispatcher. 
c 3 
Cc 3 Entered with the following in registers: 
Cc }; al, bx, ex, dx intact (set by INT 10 invoker) 
Cc 3 ah = v_mode 
Cf rn rn nnn men en nnn enn enn mene nn ene n ence nese nencccn 
Cc 
D7CD C code segment public 'ROM' 
Cc assume cs:code, ds:data, es:v_ram, ss:nothing 
c 
Cc PS SS SS SSS SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSssesessssse 
c 3 
c.g Read Light Pen function code = O4h 
c 3 
Cc Input: None. 
G Output: ah = 0 light pen switch not down/not triggered 
Cc (3; ah = 1 implies: 
CG 4 (dh,dl) = (row,col) of character light pen 
C % position from (0,0) 
Cc ; ch = raster line (0-199) 
(an bx = pixel column (0-319,0-639) 
Cc 3 
Cc 3 Trash: None. 222 
Cc 
Cc SO 
c 
D7CD C grf_light_pen proc near 
Cc 
D7CD 32 E4 c xor ah,ah ; return ah = O for now (al intact)... 
DTICF C3 c ret 
Cc 
D7DO C grf_light_pen endp 
c 
C page 
Cc pESSSSSSSSSSSSSSSSSS SS SSS SSS SSSSSSSSSSSSSSS SSS SSSSSSSSSSSSSSSSSTSSSSSSSSSSSSSsss 
Cc 3 
Cc }; Read Dot function code = ODh 
Cc 35 
c 3 reads a pixel from the indicated location returning its value. 
Cc ; valid in graphics modes only. 
c 3 
Cc ¢ Input: 
Cc 5 AH = CRT Mode 
Cc «4 DX = row (0..199 in Med. & Hi-Res., 0..399 in Ultra Res Mode) 
Cc ;3 CX = column (0..319 in Med, 0..639 in Hi & Ultra Res. Modes) 
Cc 5 
C 3 Output: 
Cc 3; AL = dot value read 
Cc 6s AH = mask of pixel in byte (from g_addr) 
Cc i; 
Cc 3; Saved: BX, CX, DX (Video dispatcher saves the rest) 
c 3 
Co jee nnn nnn ee ee eee e 
c 
D7DO C grf_read_dot proc near 
Cc 
D7D0 52 c push dx o 3 Save registers 
D7D1 = =51 c push ex 
c 
D7D2 =50 Cc push ax ; Save ert mode (high byte) 
D7D3. +E8 D815 R y call g_addr ; compute address & mask 
D7D6 8A C4 c mov al,ah ; copy mask 
D7D8 26: 22 05 Cc and al, byte ptr es:[di] ; AND with byte containing pixel 
D7DB 5A Cc pop dx ; dh = ert mode 
D7DC_ FE Ci c ine el ; prep for wraparound left (B & W) 
D7DE 80 FE 05 c emp dh,5 ; color? 
D7E1 7F 02 c jg g@e_jsfy_dot ; jump if not 
D7E3 FE Ci Cc ine el ; prep for wraparound left (color) 
D7E5 C gijsfy_dot: 
D7E5 D2 co Cc rol al,cl ; right justify pixel 
Cc 
D7E7 59 Cc pop ex ; restore registers 
D7E8 5A Cc pop dx 
DTE9 C3 c ret 
c 
D7EA C grf_read_dot endp 
Cc 
C page 
Cc PS SSSSSSSSSSSSSSSSSSSSSSSSSSSHSSSSSSSSSSSSSSSSSSSSsessssssssssssessesesssseessezee 
(& . 
Cc function code = OCh 
Cc 
Cc 


8-74 


’ 
‘ Write Dot 
; 
’ 


writes a pixel, 


with the indicated value, 


at the indicated location, 


D7EA 


D7EA 
D7EB 
D7EC 


D7ED 
DTFO 
D7F3 
D7F4 
DTF5 
DTF7 
D7F9 
D7 FB 
D7FD 
D7FF 
D7FF 
D801 
D804 
D806 
D808 
D808 
D80A 
D80C 
D80E 


D811 
D812 
D813 
D814 


D815 


D815 


52 
54 
50 


E8 
26: 
5A 
52 
OA 
78 
F6 
22 
F6 


FE 
80 
TF 
FE 


D2 
22 
32 
26: 


58 
59 
5A 
C3 


D815 R 
8A 05 


D2 
06 
D4 
cy 
D4 


C1 
FE 05 
02 
ci 


CA 
D4 
C2 
88 05 


C7 2000 


REE REEIS LS ARORA TARO THAR RAGT SRO CCM SSCA AOA A SK AGaHAAMEHAaRaeenaadseroasnaeenanaaeadeaeaasadnansenc 


Mt ee we we ee we we we we we wee we 


erf_writ 


g@ xorbit 


@ align_ 


erf_writ 
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valid in graphics modes only. 


Input: 


e_dot 


push 
push 
push 


eall 
mov 
pop 
push 
or 
js 
not 
and 
not 
ine 
cmp 
jg 
ine 
dot: 
ror 
and 
xor 
mov 


pop 
pop 
pop 
ret 


e_dot 


AL = 


0 
> 
“oui 


AX, B 


g_add 
al, by 
dx 
dx 
dl,dl 
g@_xor 


dh,5 
g ali 
ol 


dl,cl 
dl,ah 
al,dl 
byte 


ax 
ex 
dx 


dot value to write (1 or 2 bits depending on mode, 
right justified). Bit 7 = 1 specifies XOR the value 
with the pixel at DX, CX 

CRT Mode 

row (0-399) (the actual value depends on the mode) 
column (0-639) (the values are not range checked) 


X, CX, DX (Video dispatcher saves the rest) 


; preserve working registers 


r ; compute address & mask 

te ptr es:[di] ; fetch byte from video memory 
; get v_mode & dot value to write 
; resave 
; is the XOR bit set? 

bit 3; jump if yes 
; invert mask 
; Clear bits for new pixel 
; restore mask for later 


prep for wraparound right (béw) 
color ? 
jump if no 


gn_dot 
prep for wraparound right (color) 


wee ee ee we 


; align new pixel 

; strip off non-pixel bits (xor bit, etc) 

; OR or XOR in new pixel depending on xor bit 
ptr es:([di],al ; update video memory 


; restore registers 


This subroutine determines the video RAM byte location 
of the indicated row column value. The current graphics mode 
is taken into account. 


INPUT: 
AH = current graphics mode 
DX = row value (0-399) 
CX = column value (0-639) 
OUTPUT: 
DI = byte address of pixel location in video ram 
AH = mask of pixel in byte 
CL = # of bits from left end of byte to leftmost bit in mask 
DESTROYED: 
AL, CX, DX, BP 
proc near 


; convert row-count to a "mod 4" value; 
; multiply it by 2000H for offset to start of v_ram subarea 


g@ skp_1: 


g@ skp_2: 


; add bytes for 


g@ skp_3: 


push 
mov 
mov 
emp 
jb 
mov 
mov 


xor 
and 


jz 


add 
loop 


push 
mov 
mov 
shr 


mov 
nov 


cx ; Save column count 
bp,1 ; shift count; assume not 640x400 
ex, bp ; multiplier; assume not 640x400 
ah,64 ; video mode 64 or 72? 
g_skp_1 ; -no: jmp 
bp,2 ; -yes; change shift count 
cx, 3 ; -yes: change multiplier 
di,di ; init offset amount 
ex, dx ; get least sig. bit(s) from row count 
g@ skp_3 . jmp if nothing to add 
; Mini-multiply loop 
di,2000H ; add v_ram sub-area size 
g skp_2 R do it again (maybe) 
the row coordinate to the offset into the v_ram subarea 
di > temp. store offset 
di,dx ; DX<--row count 
ex, bp ; CX<--mode-related shift val 
di,cl ; get #rows into a v_ram subarea 
dx, di ; Save a copy for a moment 
ex,0406H ; mult. di by 80 [rows-->byte offset] 


enn nner ne SSS SSS SSNS 
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D83E D3 E7 c sal di,cl . [fast multiply- 
D840 8A CD C mov el,ch ; by-80] 
D842 D3 E2 Cc sal dx,cl 
D844 03 FA (6) add di,dx ; #subarea byte offset for this row 
Cc 
D846 59 c pop ex ; retrieve subarea beginning's offset 
D847 03 FI Cc add di,ex ; offset from start of v_ram 
D849 «5A Cc pop dx ; restore column count 
Cc 
Cc ; find column offset 
c 
D84A BI 0703 c mov ex, 703H ; initialize for black & white 
D84D 80 FC 05 c emp ah,5 ; color ? 
D850 7F 03 Cc jg g@_skp_4 ; CX = 703H (black & white) 
D852 BY 0302 Cc mov ex,302H ; CX = 302H (color) 
D855 C g_skp_4: 
c 
C ; CL = shift count to divide column by pixels per byte... 
G * 3 for b&w (divide by 8), 2 for color (divide by 4) 
C ; CH = remainder's mask during division (7 for b&w , 3 for color) 
Cc ; DX = column 
Cc ; DI = address to column 0 of requested row 
Cc 
D855 22 EA c and eh,dl ; get division's remainder in CH 
D857 D3 EA Cc shr dx,cl ; perform division 
c 
C ; DX = quotient = column's byte offset from start of row 
C ; CH = remainder (= pixel's offset into byte) 
c 
D859 03 FA c add di,dx ; DI = pixel's byte address 
Cc 
c NOW: 
G DI = address of byte containing the pixel 
G § CH = pixel offset into byte (remainder) 
Cc ; CL = 3 (black & white) or 2 (color) 
Cc 
D85B 80 FY 03 Cc emp e1,3 3 black & white? 
D85E 74 02 c je g_bitmask ; jump if yes 
D860 DO E5 c shl ch,1 ; color: convert to bit offset 
Cc 
D862 C g_bitmask: 
D862 86 CD c xehg el,ch ; load CL, preserve "mode" 
D864 B4 80 c mov ah, 80H ; set high bit in byte 
D866 D2 EC c shr ah,cl ; mask pixel's leftmost bit 
D868 80 FD 03 c cmp ch,3 ; black & white? 
D86B 74 06 c je g_skp_5 ; jump if yes 
D86D 8A C4 c mov al,ah ; color: create 2-bit mask 
D86F DO E8 Cc shr al,1 
D871 OA EO c or ah,al 
Cc 
D873 C g_skp_5 ; DI = byte address, AH = pixel mask, 
D873 «C3 c ret ; CL = bit offset: pixel's leftmost bit 
c 
D874 C g addr endp 
Cc 
C page 
ce pS SSS SS SSS SS SSS SS SSS SS SS SSSSSS SSS SSS SSS SSS SSS SS SSS SSS SSS SSSSSSSSSSSSSSSSSsssssses 
Cc 
C 3; Seroll Up In Graphics Mode 
cj 
c ; Scroll up the number of lines specified within the specified screen 
Cc 3 area (window). 
Cc 
Cc 3 Input: 
Cc AL = number of lines to be scrolled up ( zero 
Cc 3 means clear the window) 
c 3 BH = fill pattern to be used 
Cc 3 CH,CL = upper left corner of window in which to scroll 
Cc - « DH,DL = lower right corner of window in which to scroll 
Cc : DS = data segment 
CG ES = graphics refresh ram segment 
c 3 
Gs Saved: BX, CX, DX (Video dispatcher saves the rest) 
Cc 
c Fn ne er re ee eee een eee 
Cc 
D874 C grf_graphics_up proc near 
Cc 
D874 53 Cc push bx ; save 
D875 «51 Cc push ex ; the 
D876 52 c push dx ; registers 
Cc 
G 3 eld jdir. flag = increment (from v_serl_up) 
D877 BD 0050 c mov bp, 80 joffset to next scanline (CLD => +80) 
c 
D87A 50 c push ax ;save mode, # rows to scroll 
D87B 8B C1 c mov ax,cx ;compute address of window's 
D87D E8 DB5F R Cc eall g_curs_off ‘ upper left corner 
D880 8B F8 C mov di,ax ;save in DI for string instructions 
Cc 
D882 06 C push es jset DS to video ram for string inst. 
D883 1F c pop ds 
Cc 
D884 2B D1 Cc sub dx, cx ;compute window's dimensions 
D886 81 C2 0101 C add dx,101H . DH = height, DL = width 
Cc 
D88a 58 Cc pop ax ;AH = mode, AL = # rows to scroll 
Cc 
D88B B3 02 (93 mov bl,2 ;# interlace areas = 2 for modes 4,5,6 
D88D 8A CB c mov el,bl ;# scanlines per i.a. = 4 for modes ~72 


ROM BIOS 


Fill rows in graphics refresh memory with the fill pattern 


Input: 


Listing 
D88F 80 FC 40 Cc emp ah,64 
D892 72 06 Cc jb g_tst_mod ;jump if mode = 4,5,6 
D894 B3 04 Cc mov bl,4 ;# interlace areas = 4 for modes 64 & 72 
D896 74 02 (6 je g_tst_mod ;jump if mode = 64 
D898 DO F9 Cc sar el, 1 ;# scanlines per i.a. = 2 for mode 72 
Cc 
D89A C g_tst_mod 
D89A D2 EO C sal al,el ;convert number of rows to number of 
D89C D2 £6 C sal dh,cl ;: scanlines per interlace area 
D89E 8B C8 Cc mov cx, ax ;CH = mode, CL = # scanlines to scroll 
D8A0 80 FD 06 c emp ch,6 jare we in a medium resolution mode ? 
D8A3° 7D O04 Cc jge g_set_up ;jump if no 
D8A5 D1 ET Cc sal di,1 ;double number of bytes per character 
D8A7 DO E2 c sal dl; 1 
c 
D8 Ag C g_set_up: ;get address of lines to scroll in refresh ram memory 
D8A9 81 E1 OOFF Cc and ex,00FFH ;CX = # of scanlines to scroll per i.a. 
DBAD 74 3C c jz g_filler ;if zero, go fill all of window 
ie 
D8AF 8B C1 Cc mov ax, cx jmake DH = # scanlines to fill per i.a. 
D8B1 8A EQ Cc mov ch,cl : AX = # scanlines to scroll " "*% 
D8B3 86 F5 Cc xchg dh, ch ; CH = # scanlines in window " " 
ie} 
D8B5 8B F7 G mov si,di ;compute address of scanline to be 
D8B7 Bi O04 c mov el,4 ; scrolled to top of window: 
D8B9 D3 EO c sal ax,cl ; <window's address> + 
D8BB 03 FO Cc add si,ax H (<# scanlines to scroll per i.a.> *# 
D8BD D1 EO Cc sal ax,1 ; <# bytes per scanline = 80>) 
D8BF D1 EO c sal ax,1 
D8C1 03 FO Cc add si,ax 
c 
D8C3 8A E5 c mov ah, ch ;compute # of scanlines per i.a. 
D8C5 2A E6 c sub ah, dh ; to be moved 
C 
D8C7 33 C9 Cc xor ex, cx 3;CH = O for REP counter 
Cc 
Cc 3 jmp short g_ scroller ;@0 scroll up and fill 
Cc 
D8C9 C grf_graphics_up endp 
Cc 
C page 
Cc PSS SSSSSSSSSSSSSSHSSSSSSSSSS SHS SSS SSSSSHSSSSSSS SHR SSS SSSS SASS SSS SS SSS Ssssesssssese 
cj 
c 3 Scroll rows in graphics refresh memory 
Cc 3 
Cc Hi Input: 
Cc ; AH = Number of scanlines per interlace area to be moved 
c 3 BL = Number of interlace areas 
Cc (3 CH = 0 
Cc 3 DI = Destination scanline address of first byte to fill 
Cc & SI = Source scanline address of first byte to fill 
Cc 3}; DL = Number of bytes to fill in each scanline 
Cc 3 BP = offset to next scanline (+/- 80) 
Cc 
Cc. ¢ Output: 
Cc Yy DI = address of first byte to be filled 
Cc ; AH = 0 
Cc 3 
Cc. 8 BL, BH, CH, DL, DH, BP preserved 
Cc 3 
Cc Pr nn ee ee ee eee ee 
Cc 
D&C9 C g scroller proc near 
Cc 
D8cC9 «56 c push si ;save original source 
D8CA 57 c push di ; and destination addresses 
D8CB 53 : push bx ;Save interlace areas count (BL) 
D8CC C gm area: ;Move Interlace Areas Loop 
D8CC 57 c push di ;save interlace area 
D8CD 56 c push si ‘ addresses 
D8CE 8A CA (o} mov el,dl jcount of bytes to be moved 
D8DO F3/ Ad c rep movsb jmove the scanline 
D8D2 5E c pop si jrestore interlace area 
D8D3 «O5F c pop di ;: addresses 
D8D4 81 C7 2000 c add di,2000H ;next interlace area 
D&8D8 81 C6 2000 Cc add 8i,2000H : addresses 
D8DC FE CB Cc dec bl ;loop to move one scanline in 
D8DE 75 EC Cc jnz @ m area : each interlace area 
c 
D8EO 5B Cc pop bx ;restore interlace areas count (BL) 
D8E1 5F c pop di ;restore original source 
D8E2 5E Cc pop si ; and destination addresses 
D8E3 03 FD c add di, bp jaddress next scanline in 
D8E5 03 F5 c add si,bp ; each interlace area 
D8E7 FE CC Cc dec ah sloop to move "all" scanlines in 
D8E9 75 DE Cc jnz g_scroller : each interlace area 
c 
Cc jmp short g filler ;now fill in the gap 
c 
D8 EB C g scroller endp 
Cc 
C page 
Cc 
c 
c 
C 
C 
Cc 
Cc 


BL = Number of interlace areas 
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Cc H BH = Fill pattern to be used 
Cc 3 CH = 0 
C 3 DL = Number of bytes to fill in each scanline 
Cc 3; DH = Number of scanlines to fill in each interlace area 
Gi ts DI = Destination scanline address of first byte to fill 
Cc. ¥ BP = offset to next scanline (+/- 80) 
Cc 5 
Cc 4 Output: 
Gc 4 AL = fill pattern 
Cc 4 AH = 0 
Cc 
Cr nn en nn nn nnn ene ene 
Cc 
D8 EB C gfiller proc near 
c 
D8EB 8A CT c mov al, bh ;AL = fill pattern for STOSB instruction 
c 
D8 ED C gf i _lp: ;Fill Interlace Areas Loop 
D8ED 57 c push di ;save interlace area address 
D8EE 52 Cc push dx ;save scanlines count (DH) 
Cc 
D8 EF C gf_s_lp: ;Fill Scanlines Loop 
D8EF 57. c push di ;save scanline address 
D8FO 8A CA Cc mov el,dl ;count of bytes to fill in scanline 
D8F2 F3/ AA c rep stosb ;fill scanline 
D8F4 5F c pop di jrestore scanline address 
D8F5 03 FD c add di, bp ;next scanline in interlace area 
D8F7 FE CE Cc dec dh ;fill an interlace area 
D8F9 75 F4 c jnz ge f_s_lp 
Cc 
D8FB 5A c pop dx ;restore scanlines count (DH) 
D8FC 5F c pop di ;restore interlace area address 
D8FD 81 C7 2000 c add di,2000H jnext interlace area address 
D901 FE CB c dec bl ;fill next interlace area 
D903. 75 E8& c jnz g f_ilp 
c 
D905 5A Cc pop dx ;restore 
D906 59 Cc pop cx i the 
D907 5B c pop bx : registers 
D908 C3 c ret jexit scroll routine 
c 
D909 C gfiller endp 
Cc 
C page 
C pS SSSSSSSS SS SSS SS SSS SSH SSS HHS SSS SSH SSSHS SS SSS SSS SS SSS SSS SHS SSeS ssessesessseeeezesze 
Cc 5 
C ; Scroll Down In Graphics Mode 
Cc 3 
Cc 3 Scroll down the number of lines specified within the specified screen 
Cc 3 area (window). 
Cc 3 
c 3 Input: 
Cc 3 AL = number of lines to be scrolled up ( zero 
c 3 means clear the window) 
G s BH = fill pattern to be used 
¢ 6 CH,CL = upper left corner of window in which to scroll 
Cc 3 DH,DL = lower right corner of window in which to scroll 
Cc 3 DS = data segment 
c ; ES = graphics refresh ram segment 
Cc 
Cc ; Saved: BX, CX, DX (Video dispatcher saves the rest) 
Cc 3 
Co pm m ren ener nnn nn enn ne nn ne ee ee ee ee eee ee 
c 
D909 C grf_graphics_down proc near 
c 
D909 «53 Cc push bx } save 
D9OA 51 c push ex ; the 
DIOB 52 Cc push dx ; registers 
c 
c 3 std j;dir. flag = decrement (from v_serl_dn) 
D9O0C BD FFBO Cc mov bp,-80 ;offset to next scanline (STD => -80) 
Cc 
D9OF 50 Cc push ax ;save mode, # rows to scroll 
D910 8B C2 Cc mov ax,dx ;compute address of window's 
D912 E8 DB5SF R c eall g curs_off H lower right corner 
D915 8B F8 Cc mov di,ax ;save in DI for string instructions 
c 
D917 06 Cc push es ;set DS to video ram for string inst. 
D918 1F c pop ds 
c 
D919 2B D1 Cc sub dx, cx ;compute window's dimensions 
D91B 81 C2 0101 c add dx,101H . DH = height, DL = width 
c 
D91F 58 Cc pop ax ;AH = mode, AL = # rows to scroll 
C 
D920 B3 02 c mov bl,2 ;# interlace areas = 2 for modes 4,5,6 
D922 «8A CB c mov el, bl ;# scanlines per i.a. = 4 for modes ~72 
D924 80 FC 40 Cc emp ah,64 
D927 72 06 Cc jb g_cmp_mod ;jump if mode = 4,5,6 
D929 «=B3 O04 c mov b1l,4 ;# interlace areas = 4 for modes 64 & 72 
D92B «674 02 c je g_cmp_mod ;jump if mode = 64 
D92D DO FY (6) sar el,1 ;# scanlines per i.a. = 2 for mode 72 
c 
D92F C g_cmp_mod: 
D92F D2 EO C sal al,ecl ;convert number of rows to number of 
D931 D2 £6 c sal dh,ol ; scanlines per interlace area 
D933 80 FC 06 e emp ah,6 jare we in a medium resolution mode ? 
D936 «=©7D 05 c jge g _setdown ;jump if no 
D938 D1 ET ¢ sal di,1 ;double number of bytes per character 


D93A 
D93C 


D93D 
D93D 
D940 
D942 
D945 
D947 
D949 
D94D 


D94F 
D951 
D953 


D955 
D957 
D959 
D95B 
D95D 
DO5F 
D961 


D963 
D965 


D967 
D969 
D96C 


E2 


D8C9 R 


3E 0084 R 
79 06 


E3 
C3 08 


E3 
EC 
0002 
06 
33 
03 


0004 


CA 
O4 
46 00 


C6 2000 
FY 
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sal dl,1 
ine di ;address last byte in bottom row 
g@ setdown: ;get address of lines to scroll in refresh RAM memory 
mov si,80 jaddress bottom scanline in i.a. 
sal si,ol 
sub si,80 
add di, si 
mov cx, ax ;CH = mode, CL = # scanlines to scroll 
and ex,00FFH ;CL = # of scanlines to scroll per i.a. 
jz a_filler ;if zero, go fill all of window 
mov ax, cx jmake DH = # scanlines to fill per i.a. 
mov eh,col ; AX = # scanlines to scroll " *% 
xohg dh, oh ; CH = # scanlines in window " " 
mov si,di ;compute address of scanline to be 
mov o1,4 ; scrolled to top of window: 
sal ax,cl ; <window's address> - 
sub si,ax ; (<# scanlines to scroll per i.a.> ® 
sal ax,1 A <# bytes per scanline = 80>) 
sal ax,1 
sub si,ax 
mov ah,ch ;compute # of scanlines per i.a. 
sub ah, dh ‘ to be moved 
xor ex, cx ;CH = O for REP counter 
jmp g@ scroller 380 scroll down and fill 
erf_graphics_down endp 
page 
PSSSSSHSSSSSSSSHSSSSSSSSSSSSSSSSSSSSSSASSSSSHSASSSSSSSASSSSSSSSSSSSSSSR SSS Se Ssesseese 
; 
; graphics_read - read the character at the current cursor 
; position on the screen, or zero, 
; Input: none 
’ 
; Output: AL = character at the current cursor position or zero 
, 
; Saved: BX, CX, DX (video dispatcher saves the rest) 
’ 
H cen ew we we eB BO BE OO OO BOO Oe EE EE EE OO EE OE BO OE EO EE EO Oe OE OE OO OE OEE OE OO BE OO EOE eee EO eee ee 
erf_graphics_read proc near 
push bx }; save 
push ex ; the 
push dx H registers 
mov bl,ah ;BL saves v_mode 
mov ax,word ptr ds:[v_curpos] 
call g_curs_off ;get address of cursor position 
mov si,ax ;8ave as a pointer for later 
mov al,bl ;AL saves v_mode 
mov ex,4 ;# scanlines per i.a. = 4 for modes ~72 
xor bx, bx jmake BX=0 for modes 4,5,6 
cmp al,64 
jb g_lds_r ;jump if mode = 4,5,6 
mov b1,4 jmake BX=4 for mode 64 
je g_lds_r ;jump if mode = 64 
sar ex,1 3# scanlines per i,a. = 2 for mode 72 
xor bx, bx ;make BX=0 for mode 72 
@_lds_r;: ;(BX= font pointer offset in master table) 
lds di,dword ptr ds:[master_tbl_ptr] ;get pointer to master table 
lds di,dword ptr ds:(di+6][bx] ;get pointer to font's 1st 128 chars 
push ds ;XCHG DS,ES 
push es 
pop ds ;DS:SI -> grafix ram read location 727? 
pop es ;ES:DI -> font's 1st 128 characters 
sal bx, 1 jmake BX=8 for modes 4,5,6,72 
add bx,8 ‘ BX=16 for mode 64 
;(BX= number of font bytes per character) 
sub sp, bx jget stack space for font bytes 
mov bp,sp ;Save pointer to stack space 
mov dx, 2 ;number of interlace areas (modes 4,5,6) 
cmp al,6 ;check graphics mode 
ad g_rd_med ;jump if in medium resolution mode (4,5) 
je g_rdloop ;jump if in 640x200 resolution mode (6) 
; we're in super resolution (640x400) mode (64 & 72) 
mov dx,4 ;number of interlace areas 
g_rdloop: ;Read Scanlines Loop for both 640x200 and 640x400 
push ex ;save # of scanlines per interlace area 
push si ;save current addr. in interlace area #1 
mov ex,dx jinit. counter: # of interlace areas 
g@_rd_ia: ;Read Interlace Area Loop 
mov al,[si] jget byte from grafix ram 


;save on reserved stack 
ine bp ;bump reserved stack address 
;address next interlace area 


8-79 


ROM BIOS 
Listing 


83 FA 04 


F6 04 80 


88 46 00 


81 C6 2000 


83 C6 50 


B9 0080 


83 FB 10 


8E D9 

C4 3E OO7C R 

EB OC 

2E: 8E 1E E5F2 R 


C5 3E 0084 R 
Ch 7D OF 


8c CO 


MaAcqnnangaAnAMgaAdaANnnMD ANA MAM Maa AnAAANMNANANNANANANANAANANANANANAMAAAAaAaMnaanNNANANANAANNANAANANANAANNAAMAANMANANANAANANANAANANAANANAANAANANAAaANANAANANAAAADA 


pop 
add 
pop 
loop 


cmp 
jne 
mov 
sub 
test 
jz 


mov 


si 

si,80 

ex 
g_rdloop 


dx,4 

g_matchb 

si, bp 

si,bx 

byte ptr [si],80H 
g_matchb 

ex, bx 


g_unreverse_video_loop: 


not 
ine 
loop 


byte ptr [si] 
si 
g_unreverse_video_loop 


jmp short g_matchb 


g@_rd_med: 
sal 


g_medget: 
push 
push 
mov 

g@_med_ia: 
push 
mov 
xchg 


not 
mov 
shl 
and 
not 


xor 
mov 
g@ med bit: 
shr 
shr 
rer 
loop 


mov 
ine 
add 
pop 
loop 


pop 
add 
pop 
loop 


g@ _matchb: 


sub 
mov 
xor 
g@_f_cont: 
push 
pop 
mov 


g@_f_mach: 
push 
mov 
push 
push 


; no match in first 128 ascii character 


or 
jz 
emp 
je 


mov 
assume 
les 

assume 


;restore interlace area #1 address 
jaddress next scanline in each i.a. 
jrestore # of scanlines counter 


;are we in mode 64 or 72 (640x400)? 
;jump if no (reverse video not allowed) 
;point to first byte in stack save area 


;is upper left bit of char = 0 or 1 ? 
;jump if 0 (not reversed video) 
;number of char bytes counter 


jreverse the reversed byte for matching 
;address next char byte 


jnow find the char in the font table 


;Read Medium Resolution 


si, 1 


;Get font bytes 


si,2000H 
cx 
g_med_ia 


si 

si,80 

ex 
g_medget 


;double graf ram pointer (2 bytes/char) 


in medium resolution (320 X 260) mode 
;save # scanlines per i.a. counter 
;save current scanline address 

jinit. # interlace areas counter 


;save i.a. counter 
;get 2 bytes of 1 char from video memory 
jorder them logically 


;map background pixels to 0, 
; foreground pixels to 1 


jelear result accumulator 
;prepare to process 8 bits 


jignore unused bit 

jload carry with mapped pixel value 
jrotate it into result accumulator 
;process next bit of character 


;save font byte on reserved stack 
;bump reserved stack pointer 
jaddress next interlace area 
jrestore i.a. counter 

;process next i.a. of character 


jrestore scanline address 

jaddress next scanline 

;restore scanlines counter 

;process next scanline of character 


;Match Font Byte: find character 


; Get Font Byte 


;point to first byte in stack save area 
;pointer to font bytes from graf ram 
jindex to font bytes (start with 0) 
Match Control 

;setup string compare registers 

;DS:SI -> stack area w/grafix ram bytes 
sloop control = ist 128 ascii chars. 


;Get Font Byte Match Loop 


al,al 
ge_f_exit 
bx, 16 
g_8x16_2 


ds,cx 
ds:abs0 


;save loop counter 

;counter for string compare 

;save font pointer 

;save pointer to stack save area 
;screen bytes match font bytes ? 
jretrieve pointer to stack save area 
jretrieve pointer to fonmt byte table 
jrestore loop counter 

;if match go to exit code 

jaddress next font in table 

;bump ascii index 

3;@0 back if more chars to search for 


set - look for user's second set 
jhave we scanned both 128 char 1/2s ? 
;jump if yes 

jare we in mode 64 ? 

;jump if yes 


s;move zero to segment register 


di,dword ptr ds:[intiFlocn] ;get pointer to 2nd half of 8x8 font 


ds:data 


jmp short g _test_addr 


g 8x16_2: 
mov 
lds 
les 


g@ test_addr: 
mov 


;see if font is really there 


jget 2nd half of 8x16 font 


ds,word ptr cs:[set_ds_word] ;set DS to data segment 
di,dword ptr ds:[master_tbl_ptr] ;get pointer to master table 


di,dword ptr ds:[di+14] 


ax,es 


;get pointer to 2nd half of 8x16 font 


;check if font table is set up 


8E 1E E5F2 R 


0084 R 


OO7TC R 


40 


0084 R 
06 
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or ax, di ;if zeros, then no user font table 
jz g_f_exit sno table, just go to exit 

mov al,128 ;offset to 2nd 1/2 of ascii set 
jmp short g_f_cont ;B0 back to try rest of ascii set 


g_f_exit: ;either the character is found, or al = 0 
add sp,bx ;srestore stack pointer 
pop dx jrestore 
Pop ex ; the 
pop bx : registers 
ret 
erf_graphics_read endp 
page 
pSSS SSS Sr ssssseressssesssssssssesessesssssassesessseeseseeessesseeseeeeesseeeeee 
: 
; graphics_write - write a character to the screen 
; 
; Input: AL = character to write 
; BL = Foreground color attribute 
; bit 7 = 1: xor character with graphics ram 
; CX = number of characters to write 
; DS = data segment 
: ES = graphics ram segment 
; 
; Saved: BX, CX, DX (video dispatcher saves the rest) 
; 
H cree www ww www mm me ee ee ee eee ee ee ee ewe em mmm mem mem mm eww mmm wm meme em wwe ewe me eee eee ee 
gerf_graphics_write proce near 
push bx ;save 
push ex H the 
push dx ; registers 
mov dx, ax ;DH= ort mode, DL= char to write 
; locate beginning of character in graphics ram 
mov ax,word ptr ds:[v_curpos] 


call g curs_off ;get address of cursor position 
mov di,ax ; pointer to graphics location 

; determine if character is from 1st or 2nd half of table 
emp d1,128 jis it in first 1/2 of ASCII set ? 
jb g@_selfont sdjump if in ist 1/2 (0 => 127) 


; character (128 -> 255) is in 2nd 1/2 of font table 


sub d1,128 ;make zero origin for font table lookup 
emp dh,64 pare we in mode 64 ? 

jne g 8x8 2 ;jump if no 

lds si,dword ptr ds:[master_tbl_ptr] ;get pointer to master table 
lds si,dword ptr ds:[si+14] ;get pointer to 2nd half of 8x16 font 


jmp short g_addr_test ;8ee if font table is really there 


g@ 8x8_2: ;get 2nd half of 8x8 font table 
xor si, si jmove zero to segment register 
mov ds, si 
assume ds:abs0 
lds si,dword ptr ds:[intiFlocn] ;get pointer to 2nd half of 8x8 font 


assume ds:data 


g_addr_test: 
mov ax,ds ;check if font table is set up 
or ax, si ;if zeros, then no 2nd half of table 
jnz g@ detmode ;continue if font table is present 
xor dl, dl ;Substitute null character 
mov ds,word ptr cs:[set_ds_word] srestore data segment register 
; jmp short g_selfont jand continue in 1st half of font table 


; character (0 -> 127) is in 1st 1/2 of font table 


g@ selfont: 
push bx ;preserve register 
xor bx, bx jmake BX=0 for modes 4,5,6 
emp dh,64 
jb g_lds_w ;jump if mode = 4,5,6 
mov b1,4 jmake BX=4 for mode 64 
je g_lds_w ;jump if mode = 64 
xor bx, bx ;make BX=0 for mode 72 
g_lds_w: ;(BX= font pointer offset in master table) 
lds si,dword ptr ds:[master_tbl_ptr] ;get pointer to master table 
lds si,dword ptr ds:[si+6][bx] ;get pointer to font's ist 128 chars 
pop bx ;restore register 
g@ _detmode: ;determine graphics mode 
push cx 
xor ax,ax jget ascii code in AX 
mov al,dl 
mov e153 ; to multiply by 
sal ax,ecl . 8 (font bytes per character) 
pop ex 
add si,ax jand add to address of font table 
mov d1l,4 ;# sCanlines per i.a. (modes 4,5,6,64) 
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DAB5 80 
DAB8 7C 
DABA 74 
DABC 80 
DABF B6 
DAC1 75 
DAC3 
DAC3 =B2 
DAC5 EB 
DACT7 
DACT 03 
DAC9 EB 
DACB 
DACB B6 
DACD 80 
DADO 
DADO 51 
DAD1 56 
DAD2 57 
DAD3 «33 
DAD5 8A 
DADT 
DADT 51 
DAD8 57 
DADO 8A 
DADB 
DADB AC 
DADC F6 
DADF 75 
DAR1 F6 
DAE3 
DAE3 OA 
DAE5 79 
DAET 26: 
DAEA 
DAEA 26: 
DAED 81 
DAF1 £2 
DAF3 5F 
DAFA 83 
DAFT 59 
DAF8 £2 
DAFA 5F 
DAFB 47 
DAFC 5E 
DAFD 59 
DAFE £E2 
DBOO' EB 
DBO3 
DBO3. «CD11 
DBO5 8A 
DBO7T 81 
DBOB 2E: 
DB10 8A 
DB12 8B 
DB14 
DB14 51 
DB15 56 
DB16 «657 
DB17 B9 
DB1A 
DBIA 51 
DB1B 57 
DBiC B9 
DBIF 
DBIF 51 
DB20 AC 
DBIF 51 
DB20 AC 
DB21 8A 
DB23 =BY 
DB26 
DB26 DO 
DB28 D1 
DB2A DO 
DB2C D1 
DB2E £2 
DB30 23 
DB32 =86 
DB34 OA 
DB36 =79 
DB38 26: 


FE 06 
49 
OF 


FE 48 
04 
04 


02 
09 


FO 
05 


02 
CB 01 


cg 
CA 


CE 


c3 01 
02 
DO 


DB 
03 
32 05 


88 05 
C7 2000 
E8 


E3 0003 

8A 9F DB5B R 
FB 

EB 


0004 


0002 


EO 
0008 


EC 
DB 
E8 
DB 
F6 


DD 
FB 
D2 
03 
33: 1D 


AANQAAAAANAAAAARAAANRAAAAANAQAARARAANAAAANRANANAANANANANAAAANANNQANANANAANAARANAANAANAANANAAANANANANANAAANAAKMQAAANAANAAAAAAA 


aqgQagqanagaaaanaaangngaaaa 


g@ tinytext: 
mov 


jmp short g_repchar 


g@ super_wr: 
add 


jmp short g_repchar 


g_hi_wr: 
mov 
or 


g@_repchar: 
push 
push 
push 
xor 
mov 


@_linelp: 
push 
push 
mov 


ge i_a_lp: 
lodsb 
test 
jnz 
not 

@_t_xor: 
or 
jus 
xor 

g@_w_byte: 
mov 
add 
loop 


pop 
add 
pop 
loop 


pop 
ine 
pop 
pop 
loop 
jmp 


g@ _med_wr: 
sal 
mov 
and 
mov 
mov 
mov 


@_char_lp: 
push 
push 
push 
mov 


g@ scan_lp: 
push 
push 
mov 


g@ ia_lp: 
push 
lodsb 


push 
lodsb 
mov 
mov 


g@ exp_byt: 
shr 
rer 
shr 
rer 
loop 


and 
xchg 
or 
jns 
xor 


dh ,6 
g_ med wr 
g_hi_wr 


dh,72 
dh,4 
g _super_wr 


dl,2 


si,ax 


bl, bl 


g_w_byte 
al,es:[di] 


es:[(di],al 
di,2000H 
g_i_a_lp 


di 

di, 80 

cx 
g@_linelp 


di 

di 

si 

ex 

g@ repchar 
g return 


di,1 
dl,bl 
bx,0003H 


;which resolution are we using? 
sjump if medium resolution (modes 4 & 5) 
;jump if 640x200 resolution (mode 6) 


jwe're in 640x400 resolution 
;mode 727 
;# interlace areas = 4 for modes 64 & 72 


3640x400 resolution (mode 72) 
3;# scanlines per i.a. = 2 for mode 72 


3640x400 resolution (mode 64) 
jmultiply ascii code by 16 bytes/char 


;Hi-resolution Character Write 
;interlace areas count (even/odd) 
;mode 6 doesn't allow reverse video 


;Repeat Character Loop 
;save character repeat count 
;save source address (font table) 
jsave destination addr. (grafix ram) 
;prepare loop counter 
jscanlines per interlace area counter 


;Scanline Loop 
;save scanlines per i.a. counter 
;save interlace area #1 address 
;init. interlace areas counter (2 or 4) 


;Interlace Area Loop 
jget byte from font table 
;reverse video? 
;jump if no 
jreverse video 

;Test For XOR 
;XOR the char. with grafix ram? 
;jump if no 
;XOR with grafix ram 

;Write Byte 
jwrite byte in grafix ram 
jaddress next interlace area 


jrestore interlace area #1 address 
jaddress next scanline in each i.a. 
;restore scanlines per i.a. counter 


;restore char's grafix ram address 
jaddress next character in grafix ram 
;restore char's font table address 
;restore character repeat count 
;repeat the character 

sexit 


;Medium Resolution Character Write 
j;double graf ram pointer (2 bytes/char) 
;DL saves XOR bit input param (bit 7) 
;BX= foreground color (& table offset) 


bl,cs:g_color_table[bx] ;propagate color through byte 


bh, bl 
bp, bx 


cx 


ah,al 
ex,8 


ah,1 
bx,1 
al,1 
bx, 1 
g exp_byt 


bx, bp 

bh, bl 

dl,dl 
g_med_store 
bx,es:[di] 


;Ppropagate color through word 
;BP saves word of color masks 


;Repeat Character Loop 
;save character repeat counter 
;S8ave source address (font table) 
;Save destination addr. (grafix ram) 
jinit. scanlines per i.a. counter 


;Scanline Loop 
;sSave scanlines per i.a. counter 
;save interlace area #1 address 
jinit. interlace areas counter 


;interlace Area Loop 
;save i.a. counter 
;get 


;save i.a. counter 

;get a byte from the font table 
;copy it 

j;init. loop counter (8 bits/byte) 


;Expand Byte Loop 
jload carry with font byte bit 
;rotate it into expansion accumulator 
jload carry with same bit as before 
;double the bit 
;expand font byte bits 


;color pixels with foreground color 
;reorder the bytes for grafix ram 
;is the XOR bit set ? 

;jump if no 

;XOR with grafix ram 
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DB3B C g_med_store: 
DB3B 26: 89 1D c mov es:([di],bx ;update grafix ram 
DB3E 81 C7 2000 Cc add di,2000H jaddress next interlace area 
DB42 59 c pop ex ;restore i.a. loop counter 
DB43 =E2 DA Cc loop g@ia_lp ;next interlace area 
c 
DB45 5F c pop di ;restore interlace area #1 address 
DB46 83 CT 50 c add di, 80 jaddress next scanline in each i.a. 
DB49 59 Cc pop cx jrestore scanline loop counter 
DBYA E2 CE Cc loop g@ scan_lp j;next scanline 
c 
DB4C 5F Cc pop di ;restore char's grafix ram address 
DB4D 47 c ine di ;address next character in grafix ram 
DBYE 47 C ine di 
DB4F 5E Cc pop si ;restore char's font table address 
DB50 59 Cc pop ex ;restore character repeat count 
DB51 + &E2 C1 Cc loop g@_char_lp ;repeat the character 
c 
DB53 =8A E3 c mov ah, bl ;return AX with last word written 
DB55 8A C7 c mov al, bh 
c 
DB57 C g_return: ;Return from Write Char 
DB57 5A Cc pop dx ;restore 
DB58 59 c pop ex ; the 
DB59 5B Cc pop bx H registers 
DB5A C3 Cc ret 
c 
DB5B C g_color_table label byte ;Table of foreground colors extended to byte 
Cc 
DB5B 00 Cc db 00000000B ;color 0 (bit pattern: 00) 
DB5C 55 Cc db 01010101B ;color 1 (bit pattern: 10) 
DB5D AA Cc db 10101010B ;color 2 (bit pattern: 01) 
DB5E FF Cc db 11111111B ;color 3 (bit pattern: 11) 
Cc 
DB5F C grf_graphics_write endp 
c 
c 
Cc SSS SSS SS SS SSS SSS SS SS SSS SSSSSSSSSesseqs22zqese2=2=2 
pESSSSSSSSSSSSHSSS SSS SHS SSS SSS SSS SHS HSS SSS SSH SHH SSeS SSS HSS SS Ss sts s ss ts st sesee:: 
Cc 3 
G 6¢ Get offset into graphics ram refresh memory which corresponds to 
(¢} . the current cursor position (or any arbitrary character position). 
Cc 3 
Cc 3 Input: AX = current cursor position (AL = Column #, AH = Row #) 
Cc 
Cc 3 Output: AX = offset into graphics ram 
Cc 3 
Co jeer ern enn enn - $+ ee ee ee ee ee ee ee ee ee 
Cc 
DB5F C g_curs_off proc near 
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DB5F 51 
DB6O 8A EB 
DB62 8A C4 
DB64 B1 01 
DB66 80 3E 
DB6B 74 02 
DB6D FE C1 
DB6F 
DB6F D2 EO 
DB71 32 C9 
DB73 86 E9 
DB75 F6 26 
DB79 03 C1 
DB7B 59 
DB7C C3 
DB7D 
DB7D 
DB7D 
DB7D 
DB7D 90 
DB7E DDB2 
DB80 DDB8 
DB82. DDCT 
DB84 DDD3 
DB86 DDE2 
DB88 DE51 
DB8A DE6B 
DB8C 52 65 
6E 74 
67 6E 
63 73 
DBA2 52 65 
30 20 
20 31 
OA OA 
DBB7 OD OA 
61 72 
6F 7% 
61 70 
OA 00 
DBD1 50 72 
79 20 
2D 53 
20 4a 
52 45 
52 52 
00 
DBF6 20 20 
20 20 
20 20 
20 20 
20 20 
20 20 
00 
DC1B 2A 20 
67 61 
TH 65 
T4 20 
00 
DC34 68 20 
DC3A 20 2A 
DC3D 20 50 
OA 00 
DC45 20 46 
DC4B 43 50 
38 30 
00 
DC58 52 4F 
64 75 
00 
DC65 44 4D 
6D 65 
00 
DCT2 44 4D 
6E 74 
00 


arama Dw ww 


0049 R 48 


OO4A R 


AADQDAAAAAAAANANAANAAARAAAANRANAAAARAANAAAANANAANAAAANAAANAANANRANAAANAARAARANAANDAANDAANAANANANDAANAANRAANANAANANQAAMAAANANNAMAANNAANANANANANAANNAaAAAAAAAN 


e712: 


g_curs_o 


code 


push 
mov 
mov 


mov 
emp 
je 


ine 


shl 
xor 
xchg 
mul 
add 
pop 
ret 


ff 


ends 


ex 
ch,al 
al,ah 


el,1 


;save work register 
shold column number 


;row number to al 


;mode 72 shift count (multiply * 2) 


byte ptr ds:[v_mode],72 


ge 
el 


al,cl 
el,ol 
ch,cl 


byte ptr ds:[v_width] 


ax, ex 
ex 


endp 


include pwrup1.asm 


;jump if mode 72 
;mode ~72 shift count (multiply * 4) 


;multiply row # by rows per byte 
;zero out the shift count 

;move column number for add 
;multiply by bytes per columnn 
;compute offset into refresh ran 
;restore register 

jand return to caller 


Filename: 


pwrupi.sre 


This module includes CPU, ROM, 8253 p_dma p_timer, & 8237 p_dma 
Controller tests. 


segment public 


assume 


stack_rom 


banner_m 


bt_merr 


"ROM' 
es:code, ds:nothing, es:nothing, ss:nothing 
proc near 

; word-elign stack rom 

dw i_rom ; return from i_cpu 
dw i_rom_ret ; return from rom_checksum 
dw i_dmat ; return from i_rom 
dw i_dmat_ret ; return from rtoc_chk 
dw i_dmac ; return from i_dmat 
dw i_dmac_ret ; return from menmtst 
dw i_pic ; return from i_dmac 
db ‘Resident Diagnostics',CR,LF 
db "Rev 1.0 May 1984',CR,LF,LF,NUL 
db CR,LF,'Primary Boot-Strap...',CR,LF,NUL 
db ‘Primary Boot-Strap DISK READ ERROR.',CR,NUL 


; This line must have same number of blanks as the preceding has characters: 


bt_space 


ill_m1 


ill_m2 
ill_m3 


pass_m 
fail_m 


i_cpu_m 


i_rom_m 


i_dmat_m 


i_dmac_m 


db 


db 


db 
db 


db 


db 


db 


db 


db 


db 


' ', CR,NUL 


'#® Illegal Interrupt No. ',NUL 


"h at ',NUL 
' #' NUL 
’ 


' pass',CR, LF, NUL 


' Fail',NUL 

"CPU (18086) ',NUL ; Pass/Fail 
"ROM Module ',NUL ; Pass/Fail 
'DMA Timer ', NUL ; Pass/Fail 
"DMA Control ',NUL ; Pass/Fail 
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DCTF 


DC8C 


DC99 


DCA6 


DCB3 
DCB7 
DCBB 
DCBF 


DCCC 
DCDO 


DCDD 


DCEA 


DCF4 


DDO1 


DDOE 


DD1B 
DDIF 


DD28 


DD35 


DD51 
DD52 
DD53 
DD54 
DD55 
DD56 
DD57 
DD58 
DD59 


DD5A 


DD5A 


DD5A 
DD5B 
DD5D 
DD60 
DD61 


DD62 


DD62 
DD65 
DD66 
DD68 
DD6A 
DD6C 


DD6E 


B8 
9E 
fe) 
75 
7B 
73 


37 


74 
7h 


64 
61 


55 
38 


20 
20 


4F 
49 
52 
19 
20 


54 
69 
50 


72 
6F 


62 
20 
Th 
20 


6F 
44 


6F 
42 


6F 
65 
00 
78 
73 


6C 
6C 
74 
20 
3F 


FFOO 


25 
23 
21 
1F 


Te 
20 


6F 
64 


28 
29 


6C 
20 


6F 
20 


74 
T2 


61 
6D 


52 


6F 
4F 


70 
29 


70 
29 


64 


64 
20 


63 
65 
20 
19 


PPDERLOAASIOARAOGDO ALO SAARC OOAASOAGODRA HAIG OHAOHGA GER aeGe ReGen Qaeda OnSeeGaanaooanaaensasGaeséoocascaGes 


; Pass/Fail/Fail:Hx 

; Pass/Fail 

; Pass/Fail 

; Pass/Fail/Fail:LO,HI,NR 

; Error #1 (must remain in 
; Error #2 order for addr. 
; Error #3 calculation!) 

; 


Pass/Fail/Fail:ST 


; Pass/Fail:xx 


; Pass/Fail:xx 


; Pass/Fail:ecc:y000:zz2zz:wwwwirrrr 


; Pass/Fail:xxxx 


3 Ready/Not Ready/Fail:xx 


; purposely no NULIJ!!! 


i_pic_m db ‘Interrupts ',NUL 
i_d_m db "Video Board ',NUL 
i_npu_o db "NPU (18087) ',NUL 
i_rte_m db "RT Clock ', NUL 
i_rtc_lo_m db "3;L0O', NUL 
i_rte_hi_m db "sHI', NUL 
i_rtec_nr_m db "SNR! ,NUL 

i_kb_m db 'Key board ', NUL 
i_kb_st_m db 'sST',NUL 

i_prt_m db "Printer Port',NUL 
i_com_m db "Serial Comm.',NUL 
i_RAM_m db '" kb RAM ',NUL 
i_optROM_m db ‘Optional ROM',NUL 
i_fduA_m db "Floppy (A:) ',NUL 
i_fduB_m db "Floppy (B:) ',NUL 
i_fdu_not_m db ' Not! 

i_fdu_rdy_m db " Ready',CR,LF,NUL 
i_hdu_m db ‘Fixed Disk ',NUL 


i_alt_select_m db 


; Pass/Fail:xx 


"Select Alternate CPU (y/n)?',NUL 


; db "Disk Diagnostics xxxxx'! 
; db ‘Loop Diagnostics xxxxx' 
: db ‘Primary BootStrap Floppy (A:) Not Ready 
; db ‘Insert system disk and type any key.' 
: db ‘Primary BootStrap Floppy (A:) Fail:xx' 
H db 'Primary BootStrap Floppy (B:) Fail:xx' 
; db 'Primary BootStrap Fixed Disk Fail:xx' 
; db ‘Select Operating System? 
; db "Serial BootStrap' 
i_cal_val db OFh ; port O74h = units of minutes (0-9) 
db OTh ; port O75h = tens of minutes (0-5) 
db OFh ; port 076h = units of hours (0-9) 
db 03h ; port O77h = tens of hours (0-2) 
db OFh ; port 078h = units of days (0-9) 
db 03h ; port 079h = tens of days (0-3) 
db OTh ; port O7Ah = day of week (0-7) 
db OFh ; port O7Bh = tens of months (0-9) 
db Oth ; port O7Ch = units of months (0-1) 
pi_data1 endp 
pSSSSS SS SSS SSS sss sssssesssessessssssssssssesesseeeeesssessseeetssserese 
diagnostics_1 proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
eli ; disable interrupts 
mov al,40h 3 Check Point #0 
mov dx,378h } parallel port data port address 
out dx, al j output "Running- Checkpoint 0" 
eld ; clear string direction flag 


: 8086 CPU Test 


i_epu: 


; Flags Test (All Set): SF, ZF, AF, PF, 
; (Exercises flags and accumulator only. 


mov ax,OFFOOh 
sahf 

jns i_cecpu_err 
jnz i_ecpu_err 
jnp i_cpu_err 
jnb i_epu_err 
aaa 


mee wee wee Se we we 


PO Pee mee et em em ew eB Be we we Be Pe ww mew eee me ewe ewe mmm mem em awe wee eeee es 


ah = all 1's; al = all O's 
set SF, ZF, AF, PF, & CF 
SF set? if not, abort 

ZF set? if not, abort 

PF set? if not, abort 

CF set? if not, abort 


to test if AF is set, al must be <= 9 


if AF set, then: (ah +=1) == 0; 
al = ((al+6) & OFh)== 6; CF = AF == 1 
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DD6F 73 1C jnb i_epu_err ; CF = AF set? if not, abort 
DD71 OA E4 or ah,ah 3; ah = 0? if not, abort 
DD73 75 18 jnz i_epu_err 
DD75 BO 40 mov al,40h ; ah = 0 
DD77 02 CO add al,al ; al = 40h + 4Oh = 80h = -128 
DD79 71 12 jno i_epu_err ; OF set? if not, abort 
; Flags Test (All Reset): SF, ZF, AF, PF, CF & OF. 
; (Exercises flags and accumulator only.) 
DD7B 33 CO xor ax, ax 3; ax = 0 
DD7D 9E sahf ; reset SF, ZF, AF, PF, & CF 
DDTE 78 OD js i_cpu_err ; SF reset? if not, abort 
DD80 76 OB jbe i_epu_err ; ZF or CF reset? if not, abort 
DD82 TA 09 jp i_epu_err ; PF reset? if not, abort 
DD84 37 aaa ; to test if AF reset, al must be <= 9 
; if AF reset, then: ah unchanged; 
; al = (al & OFh) == 0; CF = AF == 0 
DD85 72 06 jb i_epu_err ; CF = AF reset? if not, abort 
DD87 03 CO add ax, ax ; ax = 0? dif not, abort 
DD89 75 02 jnz i_epu_err 
3; ax = 0 + 0 = 0, so should be no OF. 
DD8B 71 11 jno i_epu_ok ; OF reset? if not, abort 
assume cs:code, ds:code, es:abs0, ss:code 
DD8&D i_epu_err: 
DD8D 8C C8 mov ax,cs ; satisfy assumptions 
DD8F 8E D8 mov ds,ax 
DD91 8E DO mov s88,ax 3; use ROM 'stack' 
DD93 BC DBT7E R mov sp,cs:(offset stack_rom) 
DD96 BE DC4B R mov si,os:(offset i_cpu_m) 
DD99 «432 EY xor ah,ah ; Clear ah (no error number to report) 
DD9B EQS EOEQ R jmp i_fatal ; i_fatal will ‘ret' to i_rom 
DD9JE i_cpu_ok: 
DD9E 8C C8 mov ax,cs ; Satisfy assumptions 
DDAO 8E D8 mov ds,ax 
DDA2 8E DO mov 88, ax ; use ROM 'stack'! 
DDAS BC DB7E R mov sp,cs:(offset stack_rom) 
DDAT BO 41 mov al,4ih ; Check Point #1 
DDA9 BA 0378 mov dx,378h ; Parallel port data port address 
DDAC EE out dx, al 5 output "Running- Checkpoint 1* 
; Reset the keyboard 
DDAD BO 00 mov al,0 
DDAF &6 61 out p_ketrl,al 
DDB1 C3 ret ; will ‘ret' to i_rom 
, let el ete lle e 
; ROM Module Test 
; eee we we eR ORO OR RO RO BE ER EE EE OEE Oe ee EO OO eR OE Oe Oe Bee ee eee eee ewe ee ee ee ee eee ee eee 
assume cs:code. 4s:code, es:abs0, ss:code 
DDB2 i_rom: 


DDB2 BE E000 
DDB5 E9 E5E5 R 
DDB8 

DDB&8 74 06 


DDBA 
DDBA BE DC58 R 
DDBD E9 EOEQ R 


DDCO 
DDCO BO 42 
DpC2 BA 0378 


DDC5 EE 
DDC6 C3 
DDC7 

DDC7 BO O04 
DDC9 E6 08 
DDCB BO 74 


AFAARMAAANAAAAANAAAAAANAAAUAAARAAAGAAAAAAAAAAAANAANAAANRANAAANAANAAARAANANDAARAANRAAAANRAAANAANAAMNADANANAGDANMNAMANAANAAAANAAANAAAAAMAAAA 


; Calculate Checksum of ROM. 


mov si,OEOO0Oh ; ROM starts at ds:si = F000:E000 
jmp rom_checksum ; ‘call' rom_checksum 

i_rom_ret: ; will ‘ret' here 
jz i_rom_ok 


mov si,cs:(offset i_rom_m) 
jmp i_fatal ; ah has illegal checksum 
; i_fatal will ‘ret' to i_dmat 
i_rom_ok 
mov al,42h Check Point #2 
mov dx,378h parallel port data port address 


’ 
, 

out dx, al j output "Running- Checkpoint 2" 
; will ‘ret' to i_dmat 


‘. 8253 p_dma p_timer Test 


Kc ccci ce ancccnmanocsneemvocmeees ee eSeebeesese ceo canoes seeeecewcecoceecteeue 
assume cs:code, ds:code, es:abs0, ss:code 

i_dmat: 

; Disable 8237A p_dma Controller before the testing of the 8253 p_dma p_timer channel. 


mov al,dma_cmd_disable ; disable p_dma controller command 
out dma_command, al 


; Proceed with the testing of the 8253 p_dma p_timer channel ()p_8253_1. 


mov al,O074h ; 01 11 010 0 => p_8253_1, 1lsb ist, mode 2, no BCD 
mov dx, p_8253_1 ; select p_dma refresh counter 
jmp rtce_chk ; “call' rte_chk 
i_dmat_ret: ; will ‘ret' here 
jz i_dmat_ok 


ROM BIOS 


Listing 
c 
Cc 
DDD5 C di_dmat_err: 
DDD5 BE DC65 R c mov si,cs:(offset i_dmat_m) 
DDD8 EQ EOEQ R Cc jmp i_fatal ; ah has error code to report. 
Cc ; i_fatal will ‘ret' to i_dmac 
Cc 
DDDB C i_dmat_ok: 
DDDB BO 43 c mov al,43h ; Check Point #3 
DDDD BA 0378 Cc mov dx,378h ; parallel port data port address 
DDEO EE Cc out dx, al ; output "Running- Checkpoint 3" 
DDE1 C3 C ret ; will ‘ret! to i_dmac 
Cc 
Cr ee een een nee eee 
oan 8237 p_dma Controller Test -- Test Chip's Operation & Channel Registers 
Cc 3 
Cc (; The 8237A p_dma Controller was disabled before the testing of the 
Cc 3 8253 p_dma p_timer channel. 
Cf ee ew eee eee ener eee 
c 
Cc assume cs:code, ds:code, es:abs0, ss:code 
c 
DDE2 C i_dmac: 
Cc 
C ; Send a ‘master clear' to 8237 p_dma Controller. 
c 
DDE2 £6 OD Cc out dma_master_clr,al ; send master clear to port 
Cc 
C ; The dma_command, dma_status, dma_request, dma_temp, and dma_ff registers 
C ; are cleared, and the dma_mask register is set (all off). 
C 3; Test readable control registers: dma_status & dma_temp) 
c 
DDES B4 01 Cc mov ah,1 ; TEMP Error #1 
c 
DDE6 E4 OD c in al,dma_temp 
DDE8 OA CO Cc or al,al ; al = 0? 
DDEA 75 72 c jnz i_dmac_err ; if not, abort 
Cc 
C j; Test all 8 16-bit readable/writeable channel registers (address and count 
C ; registers for all 4 channels, i.e., ports 0 through 7) with register bit test: 
C ; (dma_addr_x & dma_count_x are tested with OFFFFh and then Oh for x «= 0 to 3.) 
Cc 
DDEC BB FFFF Cc mov bx, OFFFFh ; bx = 0 all bits reset 
c 
DDEF C i_dmac_pass2: } outer loop 
c ; if ist pass, bx = OFFFFh 
C ; if 2nd pass, bx = Oh 
DDEF BA 0007 Cc mov dx,7 ; loop counter and port address!!! 
Cc 
DDF2 C i_dmac_lp: ; inner loop 
DDF2 8B C3 Cc mov ax,bx ; get bit test pattern 
DDFS EE c out dx, al ; write low byte of address/count 
DDF5 EE C. out dx,al ; write high byte of address/count 
DDF6 EC c in al,dx j read low byte of address/count 
DDF7 8A EO Cc mov ah,al ; Save low byte in ah 
DDF9 EC c in al,dx ; read high byte of address/count 
Cc 
DDFA 3B C3 C omp ax, bx ; does what's been read = test pattern? 
DDFC B4 02 Cc mov ah,2 ; TEMP Error #2 
DDFE 75 5E Cc jnz i_dmac_err ; 4f not, abort 
Cc 
DEOO 4A Cc deo dx ; did we decrement past port address 0? 
DEO! 79 EF c jns i_dmac_lp ; df not, continue same pass for all 8. 
Cc 
DEO3 43 Cc ino bx ; 18st pass? if so, bx = OFFFFh & loop 
DEO4 74 E9 C jz i_dmao_pass2 ; 2nd pass? if so, bx s 0 & continue 
Cc 
C ; We are done testing all 8 16-bit readable/writeable channel registers (address 
C ; and count registers for all 4 channels) with the following results: All the 
C ; address registers (dma_addr_x) and count registers (dma_count_x) have been 
C 3; dnitialized to zero, 
Cc 
C ; Load 64k (OFFFFh+1) count for RAM refresh p_dma controller channel. 
C 
DEQ6 BO FF c mov al,OFFh 
DEO8 E6 01 c out dma_count_0,al ; low byte of count for 64k RAM refresh 
DEOA E56 01 Cc out dma_count_0,al ; high byte of count for 64k RAM refresh 
C 
C ; Load mode for RAM refresh p_dma controller channel: channel 0, read, auto- 
C j; initialize, inorement, single mode. 
c 
DEOC BO 58 Cc mov al, dma_mode_0 ; mode for RAM refresh 
DEOE £6 OB Cc out dma_mode, al 
Cc 
C ; Enable p_dma controller: memory-to-I/0, controller enable, normal, fixed 
C 3; priority, late write, and DREQ/~DACK. 
Cc 
DE10 BO 00 Cc mov al,dma_omd_enable ; enable p_dma controller 
DE12 £6 08 Cc out dma_ocommand, al 
Cc 
C ; The master clear command above has masked off all channels. Now, we ‘unmask’ 
C 3; the RAM refresh dma_mask bit. p_dma RAM refresh begins for the first time! 
C 
DE14 BO 00 C mov al,dma_unmask_0O ; turn on RAM refresh channel 0 
DE16 E6 OA Cc out dma_mask_bit,al 
c 
C ; Program p_8253_1 of 18253 p_timer to proper value for RAM refresh. 
c 
DE18 BO 74 C mov al,tiomd ; select p_dma refresh counter 
DE1A E6 43 Cc out p_8253_otrl,al 
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c 
DE1C B8& 0013 c mov ax, ticount ; load p_dma refresh count 
DE1F E6 41 Cc out p_8253_1,al 
DE21 8A C4 c mov al,ah 
DE23 E6 41 Cc out p_8253_1, al 
Cc 
C ; Check dma_status for ‘hot' p_dma request from p_8253_1. 
c 
DE25 B4 03 c mov ah,3 ; TEMP Error #3 
DE27 E4 08 c in al,dma_status ; test for RAM refresh request in status 
DE29 A8& 10 c test al,010h ; bit #4 -> channel 0 request 
DE2B 75 31 c jnz i_dmac_err ; if ‘hot' p_dma request is there, abort 
Cc 
C ; Initialize other p_dma counters and modes. 
Cc 
DE2D BA OOOB c mov dx, dma_mode 
c 
C ; Initialize p_dma channel 1 not used. 
Cc 
DE30 BO 41 c mov al, dma_mode_1 ; mode for not used 
DE32 EE c out dx, al 
c 
C ; Initialize p_dma channel 2 FDU. 
Cc 
DE33 BO 56 Cc mov al, dma_mode_2 ; mode for FDU 
DE35 EE Cc out dx, al 
Cc 
C ; Initialize p_dma channel 3 display. 
c 
DE36 BO 43 c mov al ,dma_mode_3 ; mode for display 
DE38 EE c out dx, al 
c 
C ; Initialize p_dma Segment Nibble Latches to zero. 
C ; (dma_segm_x for x = 0 to 3 is port addresses 80h to 83h). 
c 
DE39 32 CO Cc xor al,al 3; al = 0 
DE3B BA 0083 c mov dx,083h 3; loop counter and port address! 
Cc ; dx = dma_segm 3 = 083h 
DE3E C i_dmac_nib: 
DE3E EE c out dx, al 
DE3F FE CA (04 dec dl ; when dl goes from 80h (-128) to 
DE41 78 FB c js i_dmac_nib ; O7Fh (+127) we will exit 
c 
CO rr rns srirs- 
Cc ; 8237 p_dma Controller Test -- Test Lowest 64k bank of RAM 
Cc a el lal lal ee eeteietetetetetetetaetate 
c 
Cc assume cs:code, ds:data, es:abs0, ss:code 
c 
DE43 2E: 8E 1E E5F2 R Cc mov ds,word ptr cs:[set_ds_word] 3; satisfy assumptions 
DES8 8B 36 0072 R c mov si,word ptr ds:[reset_flag] ; save reset_flag 
c 
DESC 33 D2 c xor dx, dx ; dx = 0; test 0000:0 to 0000:FFFF 
DESE EQ E266 R c jmp memtst ; “call' memtst 
DE51 C i_dmac_ret: ; will ‘ret' here 
c 
DE51 2E: 8E 1E E5F2 R Cc mov ds,word ptr cs:[set_ds_word] ; Satisfy assumptions 
DE56 89 36 0072 R c mov word ptr ds:[reset_flag], si ; restore reset_flag 
c 
DE5A B4 O04 Cc mov ah,4 ; TEMP Error #4 
DESC 74 06 G jz i_dmac_ok 
c 
c 
DE5E C i_dmac_err: 
DE5E BE DC72 R c mov si,es:(offset i_dmac_m) 
DE61 E9 EOEQ R Cc jmp i_fatal ; ah has error code to report. 
Cc ; i_fatal will ‘ret' to i_pic 
c 
DE64 C i_dmac_ok: 
DE64 BO 44 C mov al,44h ; Check Point #4 
DE66 BA 0378 c mov dx,378h ; Parallel port data port address 
DE69 EE Cc out dx, al ; output "Running- Checkpoint 4" 
DE6A C3 c ret ; will ‘ret' to_pic 
c 
Co errr errr rn rn rn nnn nn enn ee eee eee eee 
Cc 3 8259A Programmable Interrupt Controller Test. 
Cf nn nn ee ee ee eee ee 
Cc 
Cc assume cs:code, ds:data, es:abs0, ss:stack_ram 
c 
DE6B C i_pie: 
DE6B- B8 0030 ¢ mov ax, stack_seg ;Initialize RAM Stack 
DE6E 8E DO Cc mov ss,ax ; on lower tested memory 
DE7O BC 0100 c mov sp,100h 
c 
Cc 3 Initialize & Disable 8259A Programmable Interrupt Controller. 
Cc 
DE73 E8 E1DC R c call i_pic_init 
Cc 
Cc ; Install Interrupt Vectors for diagnostics. 
Cc 
C 3; Install unexpected diagnostic interrupt vectors. 
c 
DE7T6 33 F6 Cc xor si,si ; es:si = absO_seg:intOOlocn 
DE78 8B FE C mov di, at ; es:di = absO_seg:intOOlocn 
DET7TA BY O1FE (e} mov ex, (O400h-0004h)/2 ; words from 0:0004h to 0:0400h 
Cc 
DE7D B8 DEDC R c mov ax,es:(offset i_pic_err) ; store offset i_pic_err 
DE80 AB c stosw 
DE81 8C C8 c mov ax,cs } store segment address 
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stosw ; es:di = absO_seg:intOOlocn + 4 
rep movs word ptr es:0004h,word ptr es:0000h ; replicate vector 


; Install software diagnostic interrupt vectors. 


DE87 B8 DEAQ R mov ax,ces:(offset i_pic_0_ok) ; ax = offset i_pic_0_ok 

DE8A 33 FF xor di, di ; es:di = absO_seg:int0OOlocn 
DE8C B1 05 mov el 5 ; load INT's Oh through 4h. 
DE8E i_pic_soft: 3; ax = (4*#x)+(i_pic_0_ok) 

DE8E AB stosw ; es:di gets offset i_pic_x_ok 
DE8F 47 ine di ; skip segment (already = cs) 
DE90 47 ine di 

DE91 05 0004 add ax,4 ; i_pic_x_ok are 4 bytes apart 
DE94 E2 F8 loop i_piec_soft until cx = 0. 


; Install hardware diagnostic interrupt vectors. 


DE96 B8 FF23 R mov ax,es:(offset ill_int) ; ax = offset ill_int 
DE99 BF 0020 R mov di,es:(offset int08locn) ; es:di = absO_seg:int08locn 
DE9C B1 08 mov e1l,8 ; load INT's 8h through Fh. 
DEJE i_pic_hard: 
DE9E AB stosw ; es:di gets offset ill_int 
DE9F 47 ine di ; skip segment (already = cs) 
DEAO AT ine di 
DEA1 E2 FB loop i_pic_hard * until ox = 0. 
; Test software interrupts first (cl = 0 if error). 
DEA3 BT 09 mov bh,09h ; bx has its 8th and 11th bits set. 
; ex = O from loop above. 
DEA5 F6 F5 div ch ; generate a divide-by-zero INT 00h 
DEAT EB 33 jmp short i_pic_err 
DEAS i_pic_0O_ok: 
; bh = O9h. set trap & OF flags in bx 
; (bits 8 and 11 of flags). 
DEA9 53 push bx ; put trap flags on stack 
DEAA 9D popf ; generate a single-step trap INT Oth 
DEAB’ EB 2F jmp short i_pic_err ; must be 4 bytes long! 
DEAD 1 pice _Taok’ 
DEAD CD 02 INT 02h ; generate a software interrupt INT 02h 
DEAF’ EB 2B jmp short i_pic_err ; must be 4 bytes long! 
DEB1 i_piec_2_ok: 
DEB1 CC INT 03h ; generate a 1-byte break-point INT 03h 
DEB2 90 nop ; must be 4 bytes long! 
DEB3 EB 27 jmp short i_pic_err 
DEB5 i_pic_3_ok: 
; OF overflow flag is still set. 
DEB5 CE INTO ; generate an overflow interrupt INT 04h 
DEB6 90 nop ; must be 4 bytes long! 
DEB? EB 23 jmp short i_pic_err 
DEBS i_pic_4_ok: 


; Test hardware interrupts second. 


; Test 8259A PIC interrupt mask with test patterns (cl = 0 if error). 


| 


ANAAAAAAAA A AAD QAN AD AAG AQAAAGDAAGAAAARAAQAAAAAAQAAAKADAAAQAAAAAaEAAQAAQaAAARQaAaANQaAAANQAANaAaAaAAQaAQCaANIARAaAQaANIAAARQaEAQaAAARQNKNAgQ AQAaQAgaAQNQaQAQA AQ eC0a 


DEB9 BO 01 mov al,1 ; initialize mask value = 1 
DEBB i1_pic_test: 
DEBB £8 E1ED R call i_out_mask ; Output pattern, test input 
DEBE 75 1C jne i_pic_err ; if not same pattern, abort 
DECO DO DO rel al,1 ; rotate test pattern 
DEC2 73 FT jne i_pic_test ; test again, if not finished 
DEC4 BO FF mov al,OFFh ; test pattern of all ones 
DEC6 E8 E1ED R eall i_out_mask ; output pattern, test input 
DEC9 75 11 jne i_pic_err ; if not same pattern, abort 
; Look for ‘hot' (active though masked off) PIC interrupts (cl = IR# if error). 
; Enable Interrupts for the very first time! 
DECB’ FB sti ; enable interrupts 
DECC 33 C9 xor ex, cx ; delay awhile, waiting for 
DECE E2 FE loop $ ; a ‘hot' interrupt. 
DEDO AO 006B R mov al,byte ptr ds:[intr_flag] ; get the flag from ill_int 
DED3 OA CO or al,al ; intr_flag = 0? 
DED5 74 34 jz i_pic_ok ; if so, we're all done. 
; Convert ‘hot! interrupt mask (bit pattern) to IR# (1 to 8 error code). 
DED7 i_pic_hot;: ; ex = 0 from loop above. 
DED? 41 ine ex ; increment cx (IR#+1). 
DED8 DO D8 rer al,1 ; mask's least significant bit. 
DEDA 73 FB jnb i_pic_hot ; if not set, continue. 
; (exit with cl = 1 to 8.) 
DEDC i_pic_err: ; cl = 0 or failing PIC “hot' active IR# 
DEDC BC 0100 mov sp,100h ; re-initialize stack 
DEDF 51 push ex ; save error code. 
; Install Vector Table. ; set int1i0locn = code_seg:v_io, and 


a 
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DEEO E8 E1A0O R 


DEE3 E8 E148 R 


DEE6 BE DCT7F R 
DEES E8 E5FA R 


DEEC BE DC45 R 
DEEF E8 E5FA R 


DEF2 59 
DEF3 OA C9 
DEF5 74 OE 


DEF7 E8 E626 R 
DEFA B8& OE48 
DEFD CD 10 
DEFF 8A C1 
DFO1 48 

DFO2 £E8 E650 R 


DFO5 
DFO5 E8 E619 R 
DFO8 EB 07 


DFOA F4 

DFOB 

DFOB BO 45 
DFOD BA 0378 
DF10 EE 

DF11 


DF11 BC 0100 
DFi14 E8 E1A0 R 


DF17 E8 E148 R 


DFIA 

DF1A_ BE DB8C R 
DF1D E8 E5FA R 
DF20 BE DC4B R 
DF23 E8 E5FA R 
DF26 BE DC3D R 
DF29 E8 E5FA R 
DF2C BE DC58 R 
DF2F E8& E5FA R 
DF32 BE DC3D R 
DF35 E8 E5SFA R 
DF38 BE DC65 R 
DF3B E8 ES5SFA R 
DF3E BE DC3D R 
DF41 E8 E5FA R 
DF44 BE DC72 R 
DF47 E8 ESFA R 
DF4A BE DC3D R 
DF4D E8 E5SFA R 
DF50 BE DC7F R 
DF53 §E8 ESFA R 
DF56 BE DC3D R 
DF59 §E8 E5FA R 


DF5C 


DF5C BD 0040 


DF5F 8B 36 0072 R 
DF63 81 EE 1234 
DF67 33 FF 


AMAAVDAAAVAAARAVAAAAAAAAANRAAAAAAAAAAANAAAAANAAARAAAAANAAAAAAAARAAANAAGQAAAAARAAAAAAAMAAAAAAAAAAAAAAAAAAAaaaaacaaa 


eall 


i_vector 


; Initialize Video. 


call 
; Display error 


mov 
eall 


mov 
call 


pop 
or 


jz 
; Display ‘hot! 


eall 
mov 
int 
mov 
dec 
eall 


i_pic_no_hot: 
call 
jmp 


hilt 


i_pic_ok: 
mov 
mov 
out 


i_d_init 
message. 


si,es:(offset 
DRomString 


si,cs:(offset 
DRomString 


ex 
el,cl 
i_pic_no_hot 


; set intiDlocn = code_seg:v_parms. 


i_pic_m) 
; display failing test message. 


fail_m) 
; display fail message. 


; restore error code. 
5; cl = 07? 
; if so, we're done. 


interrupt number :Hx. (where x is the IR# from 0 to 7) 


DColon ; display a colon. 

ax,(OEh#100h)+'H' ; display “‘hot' interrupt symbol. 

10h 

al,el ; transfer error code. 

ax ; error code (1 to 8) to (0 to 7) IR#. 
DHexNib ; display lowest nibble. 

DCrLf 


short i_pic_end 


sp,100h 


; Check Point #5 
; parallel port data port address 
; Output "Running- Checkpoint 5" 


we we ee ee ee mw ee me ee eee ee eee a a ee eee ee ee ee ee ee ee ee ee ee ee ee ew ee ee ee ee ee ee ee 


; Determine System Configuration from Switches and Initialize Video. 


disp_pass: 
mov 
eall 


mov 
call 
mov 

call 


mov 
eall 
mov 

eall 


mov 
call 
mov 

call 


mov 
eall 
mov 
call 


i_d_init 


si,cs:(offset 
DRomString 


si,cs:(offset 
DRomString 
si,cs:(offset 
DRomString 


si,cs:(offset 
DRomString 
si,cs:(offset 
DRomString 


si,cs:(offset 
DRomString 
si,cs:(offset 
DRomString 


si,cs:(offset 
DRomString 
si,ces:(offset 
DRomString 


si,cs:(offset 
DRomString 
si,cs:(offset 
DRomString 


ww nm mmm nr ee a a a a a a a a a a ee we ee ee ew eee ee ee ee ee ee ee ee eee ee eee 


banner_m) 


i_epu_m) 


pass_m) 


i_rom_m) 


pass_m) 


i_dmat_m) 


pass _m) 


i_dmac_m) 


pass_m) 


i_pic_m) 


pass_m) 


7 Size & clear RAM at every 64k byte bank past the lowest 64k. 


RAM_size_tst: 


mov 


mov 
sub 
xor 


assume cs:code, ds:data, es:abs0, ss:stack_ram 

bp,64 jinitialize memory count 
si,word ptr ds:[reset_flag] ; get warm bootflag 
8i,01234h ; si=0 iff CTL ALT DEL sequence. 
di,di ; offset = 0000h 
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DF69 BA 
DF6C 

DF6C 8E 
DF6E 26 
DF71 FT 
DF73 26 
DF76 26 
DF79 3B 
DF7B FT 
DF7D 75 
DF7F 26 
DF82 OB 
DF84 74 
DF86 E8 
DF89 75 
DF8B_ 83 
DF8E 56 
DF8F B8 
DF92 CD 
DF94 8B 
DF96 BB 
DF99_ EB 
DF9C BE 
DFOF E8 
DFA2 5E 
DFA3 

DFA3 80 
DFA6 80 
DFA9 72 
DFAB 

DFAB OB 
DFAD 74 
DFAF BE 
DFB2 £8 
DFB5 

DFB5 33 
DFB7 8E 
DFB9 8A 
DFBB Di 
DFBD D1 
DFBF 2E 
DFCK A3 
DFC7 EB 
DFC9 

DFC9 52 
DFCA 1E 
DFCB 50 
DFCC E8 
DFCF BE 
DFD2 £8 
DFD5 £8 
DFD8 E4 
DFDA 24 
DFDC E8 
DFDF £8 
DFE2 8E 
DFE4 8B 
DFE6 £8 
DFE9 £8 
DFEC 1F 
DFED 8B 
DFEF £8 
DFF2~ £E8 
DFF5 1F 
DFF6 5A 
DFF7 EB 


. 
. 


8E 1E E5F2 R 
0013 R 


30 


BC 


aww 


mov 
RAM_size_lp: 
mov 


mov 
not 
mov 


mov 


emp 
not 
jne 


mov 
or 


jz 


call 
jnz 


add 
push 
mov 
INT 


mov 
mov 
eall 
mov 
call 


pop 


RAM_size_nxt: 
add 


RAM_size_end: 
or 
jz 
mov 
call 


RAM_size_end_1: 
xor 
mov 
mov 
shl 
shl 


mov 
mov 


; GoTo Display Passing Messages 


dx,1000h 


es, dx 


ax,word ptr es:[di] 


ax 


word ptr es:[di],ax 


bx,word ptr es:[di] 


ax, bx 
ax 
RAM_size_end 


word ptr es:[di],ax 


si, si 
RAM_size_nxt 


memtst 
RAM_error 


bp, 64 

si 
ax,OEODh 
10H 


ax, bp 
bx,3 
DN umW 


si,cs:(offset i_RAM_m) 


DRomString 
si 

dh,10h 
dh,OAOh 
RAM_size_lp 


assume cs:code, 


si,si 
RAM_size_end_1 


ds:data, 


; 
;D 
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start at 1000:0000 (dx keeps segment) 
get segment 


read existing ram value 
complement it 
write complement back to RAM 


read back from RAM 


verify to test for end of RAM 
recreate original value 
if verify fails, at end of RAM 


restore original value back to RAM 
test warm boot flag 

if CTL ALT DEL sequence, 

don't clear memory 

test and clear memory 

test flag from storage test 


increment size 
save Warm Boot Flag 
put out a CR 


display tested RAM 


retrieve Warm Boot Flag 


maximum RAM = 640k = 10 ® 64k 
next segment 

top of RAM yet (A000:0000)? 
if not, continue. 


es:abs0, ss:stack_ram 


test warm boot flag 
if CTL ALT DEL sequence, 


si,cs:(offset pass_m) isplay OK 
DRomString 

; bx = RAM size/16 
ax,ax ,; ax = 0 
es,ax ; Satisfy assumptions es = 0 = abs0_seg 
al, dh ; ax = (RAM size/16)/256 = RAM size/4k 
ax,1 ; ax = (RAM size/4k) * 2 = RAM size/2k 
ax,1 j} ax = (RAM size/2k) * 2 = RAM size/ik 
ds,word ptr cs:[set_ds_word] ; restore data segment pointer 


word ptr ds:[memory_size],ax 


jmp short i_cal 


RAM_error: 


where: 


; 
: 
’ 
; 
: 
, 
; 
; 


dx 
ds 
ax 


DCrLf 


si,ces: (offset fail_m) 


DRomString 
DColon 


al,sys_conf_a 
al,OFh 
DHexByte 


DColon 


ds,dx 
ax, di 
DHexLong 


DColon 


ds 

ax,bx 
DHexLong 
DCrLf 


ds 
dx 


ec 
yooo 
ZZZZ 


WwwwWw 
Perr 


short RAM_size_end_1 


nu on non 


3G 


o check clock calendar 


Error message looks like: Fail:ce:yO000:zz2zz:wwwwirrrr 


RAM configuration number 

Segment of failure = dx = es 
Offset of failure = di 

Data that was written = ax 

Data that was read = bx 


3C 


7r 
vr 


ave failing segment 
ave ds 
save failing test pattern. 


arriage Return, Line Feed 
display fail message. 
display a colon 

get RAM configuration. 


mask valid bits. 
display RAM configuration. 


display a colon 


dx 


ds = failing segment 
= di 


ax = failing segment 
display ds:ax 


display a colon 


ds failing test pattern = on stack 
ax what was read = bx 
display ds:ax 


estore ds 
estore failing segment 
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DFF9 


DFF9 
DFFB 


BY 
cD 


B8 
86 
F6 


3D 
13 


80 
43 


80 
13 


80 
73 


81 
T2 


FE 


FE 3C 


F9 3C 


FD 18 


FB OB6A 


5D 


co 
70 
TE 


DD51 R 
0009 
0074 


AC 
EO 


cy 
cy 
28 
F1 


07 
3 


07 
07 
17 


09 


Ty 


FT7 


GE 


AARQan GAARA ANANAAA WMD MAANMAAMAAANMNAANANNAANANAANAANAANAAAANAANAANANANARNAANANANDAMAMAANAAANAANAANAANANAANAAANRNMANAANAANANANeVNAAAAANANANANAANAAAaAAAIANIANANAIANAAANM 


assume cs:code, ds:data, 
i_cal: 

; Read Clock Calendar Device. : 
mov ah,-2 ; 
int 1Ah ‘ 

; Check time & date read. 

; Hundredths of Seconds. 
mov ax,10 ; 
xchg al,dl ;: 
div dl ; 

; 
emp ax,10 ; 
jae i_eal_1_1_80 ; 

; Seconds. 
emp dh,60 ; 
jae i_cal_1_1_80 ; 

; Minutes. 
emp e1,60 ; 
jae i_cal_1_1_80 ; 

; Hours. 
cmp eh,24 ; 
jae i_cal_1_1_80 ‘ 

; Days. 
emp bx, (2#366)+(6#365) ; 

; 
jb i_cal_end : 


i_cal_1_1_80: 


; Initialize and Stop Clock. 


xor ax, ax 
out 70h, al 
out 7Eh, al 


es:abs0O, ss:stack_ram 

bx = day (from 1-1 of leap year) 
ch = hour 

cl = minutes 

dh = seconds 

dl = hundredths of seconds 

ax 10; dl = hundredths 


ax = hundredths; dl = 10 

ah = remainder, al = quotient 

(can only read tenths of seconds.) 

ah should = 0, and al should be < 10. 
if not, test chip & write 1-1-80. 


dh = seconds should be < 60. 
if not, test chip & write 1-1-80. 


cl = minutes should be < 60. 
if not, test chip & write 1-1-80. 


ch = hour should be < 24. 
if not, test chip & write 1-1-80. 


bx = day from leap year mod 8 should 
be < (00-2921) = (0-0B69h) 
if so, valid time & day, skip test. 


else invalid time & day, write 1-1-80. 


ax = 0 
test only port = out of test mode 
stop/start port = stop clock 


; Output test pattern of maximum value with all bits set to read/writable ports. 


mov si,es:(offset i_cal_val) 
mov ex,9 
mov dx,0074h 


i_cal_max: 


lods byte ptr cs:[si] 
mov ah,al 

out dx, al 

in al,dx 

and al,ah 

emp al,ah 

jnz i_cal_err 
inc dx 

loop i_cal_max 
mov al,O7h 
mov dl,7Fh 
out dx, al 

in al,dx 

in al,dx 

in al,dx 

and al,O7h 
sub al,O07h 
jnz i_cal_err 


’ 
. 
’ 
’ 


9 
T4b 


ch keeps 0; cx 
dh keeps 0; dx 


al get cs:si (ds overridden!). 

save maximum value. 

ports 74 through 7C (units of minutes 
to tens of months) get max value. 
read it back. 

mask valid bits. 

is it equal to the value written? 

if not, abort. 


increment to next port 


dh kept 0; dx = 7Fh 
interrupt (year mod 8) gets OFh. 
must do ‘int from this port 3 times. 


; mask valid bits. 


is it equal to the value written? 
if not, abort. 


; Write out Oh (bits of lower nibble reset) test pattern to read/writable ports. 


mov e1,9 
mov d1,74h 
i_ecal_0: 
out dx, al 
in al,dx 
and al,OFh 
jnz i_eal_err 
ine dx 
loop i_ecal_oO 
mov d1,7Fh 
out dx,al 


wee wee wee ee we 


al kept Oh. 
ch kept 0; cx 
dh kept 0; dx 


9 
T4h 


ports 74 through 7C (units of minutes 
to tens of months) get Oh. 

read it back. 

mask valid bits (lower nibble) = 0h? 
if not, abort. 


increment to next port 


dh kept 0; dx = 7Fh 
interrupt (year mod 8) gets OFh. 


EO7B 


EO7B 


By 
cD 


OF 
12 


DCA6 
E5FA 
DC45 
ESFA 
E619 
01 


DB 
c9 


FF 
1A 


awww 


wow 


WE LAS SLOT AeA SSR SASS AROS SORTS See a EO Se nn emmR eae aeeoNMabEs aedeeokeanenaaeudeaonencak deuce 


in al,dx ; 
in al,dx 
in al,dx 
and al,OFh ; 
jz i_cal_ok ; 


i_ecal_err: 


mov si,cs:(offset i_rtc_m) 
call DRomString 
mov si,cs:(offset fail_m) 
call DRomString ; 
call DCrLf 
jmp short i_cal_ok ; 
hlt 

i_cal_ok: 
xor bx, bx ; 
xor ex, cx ; 


; Write & Start Clock Calendar Device. 


ROM BIOS 
Listing 


must do ‘int from this port 3 times. 


mask valid bits (lower nibble) = Oh? 
if so, we're all done. 
else, abort. 


display fail message. 


try to write 1-1-80, regardless... 


1-1-80 is day 0. 
hours & minutes = 0, 


; bx = day (from 1-1 of leap year) 
mov ah,-1 3 ch = hour 
int 1Ah ; Cl = minutes 
; Output: ah = -1 implies date/time err. 
; ah = 0 implies date/time OK. 
i_cal_end: 
; OOS SSS SS SS SSS SSS SSS SSeS eres eeses Beane eon neces aaa = 
; 18253 Real-Time Time Clock Test (p_8253_1 tested in i_dmat) 


assume cs:code, ds:data, 


i_rte: 


pm me ewe we ee ew ewe ee ee ee ee ee ee ee ee 


es:abs0, ss:stack_ram 


; String to be displayed regardless of results. 


mov si,cs:(offset i_rtc_m) 
eall DRomString 


; Test 18253 real-time clock interrupt p_timer counter (p_8253_0). 


mov al,034h ; 00 11 010 0 -> p_8253_0, lsb 1st, mode 2, no BCD 
mov dx, p_8253_0 5 select real-time clock counter 

call rtec_chk 

jnz i_rtec_err ; if nz, ah has error code to report. 


; Test 18253 tone generator p_timer counter (p_8253_2). 


mov al,1 ; clear kb interrupts, reset kb, disable parity 
out p_ketrl,al ; turn off speaker data -- bit #1 

; turn on speaker gate to p_8253_2 -- bit #0 
mov al,OB4h 3 10 11 010 0 -> p_8253_2, lsb ist, mode 2, no BCD 
mov dx, p_8253_2 ; select tone generator counter 
call rtec_chk 
mov al,0 ; clear kb interrupts, reset kb, disable parity 
out p_ketrl, al ; turn off speaker data & gate -- bits #1 & #0 
jnz i_rtec_err ; 4f nz, ah has error code to report. 


; Initialize 18253 real-time clock interrupt p_timer counter (p_8253_0). 


mov al,tOcmd : 
out p_8253_ctrl,al 

mov ax, tOcount ; 
out p_8253_0,al 

mov al,ah 

out p_8253_0,al 


; Initialize 18253 tone generator p_timer 


mov al,t2emd ; 
out p_8253_ctrl, al 

mov ax, t2count ; 
out p_8253_2,al 

mov al,ah 

out p_8253_2,al 

jmp short i_rtc_ok 


i_urtc_err; ; 


select real time clock counter 


load real time clock count 


counter (p_8253_2). 


select tone generator counter 


load tone generator count 


ah has error code to report. 


mov si,cs:(offset fail_m) 
call DRomString ; display fail message. 
mov si,os:(offset i_rtceo_lo_m-(4#1) ) 
mov al,ah } al = error code = (1, 2 or, 3) 
xor ah, ah ; @x = error code = (1, 2 or, 3) 
shl ax,1 }; ax = 2"®(error code) = (2, 4, or 6) 
shl ax,1 ; ax = 4®(error code) = (4, 8, or 12) 
add si,ax ; index to (LO, HI, or NR message.) 
’ 


call DRomString 
call DCrLf 


display failing mode, 


ROM BIOS 


Listing 
c er 
EOD2 EB OD c jmp short i_rtc_end 
c 
EOD4 F4 c hlt 
c 
EOD5 C dorteo_ok: 
EOD5 BE DC3D R c mov si,cs:(offset pass_m) 
EOD8 £8 ES5FA R Cc call DRomString 
Cc 
EODB BO 48 c mov al,48h ; Check Point #8 
EODD BA 0378 Cc mov dx,378h ; parallel port data port address 
EOEO EE Cc out dx, al ; output "Running- Checkpoint 8" 
Cc 
EOE C i_rto_end: 
EOE1 B8& OE07 c mov ax, (OEn#100h)+BEL ; beep keyboard 
EOE4 CD 10 c int 10h 
c 
Cc assume os:code, ds:nothing, es:nothing, ss:stack_ram 
Cc 
EOE6 £9 E2E4 R c jmp poinit 
c 
EQE9 C diagnostics_'i endp 
c 
Co pen ewe www nee een nnnn we eee meee nnn ene ene ween new enne 
Cc Fatal Error Routine. 
ci; 
Cc ; Input: cs:si = points to offset of failing error message 
cj if ah <> 0, do DHexByte of ah. 
Cc i; if ah = 0, do nothing (just print error). 
Cc Output: None. 
cj 
Cc Trash: al, dx, & si destroyed. 
Cf we eee eee een eee eee eee eee eee eens eae a ease eae 
Cc 
EO E9 C di_fatal proo near 
c @ssume os:oode, ds:nothing, es:nothing, ss:nothing 
Cc 
C ; Disable 8237A p_dma Controller, 
Cc 
EOE9 BO 04 Cc mov al,dma_omd_disable ; disable p_dma oontroller command 
EOEB £6 08 Cc out dma_command, al 
c 
C ; Send a ‘master clear' to 8237 p_dma Controller. / 
Cc 
EOQED £6 OD c out dma_master_olr,al ; send master clear port any garbage 
c 
C ; Load 64k (OFFFFh+1) count for RAM refresh p_dma controller ohannel. 
c 
EOEF BO FF c mov al,OFFh 
EOF1 £6 01 c out dma_oount_0,al ; low byte of count for 64k RAM refresh 
EOF3 £6 01 c out dma_oount_0, al ; high byte of count for 64k RAM refresh 
Cc 
C ; Load mode for RAM refresh p_dma controller channel: ohannel 0, read, auto- 
C ; dnitialize, inorement, single mode. 
c 
EOF5 BO 58 c mov al, dma_mode_0O ; mode for RAM refresh 
EOF7 £6 OB Cc out dma_mode, al 
Cc 
C ; Enable p_dma controller: memory-to-I/0, controller enable, normal, fixed 
C ; priority, late write, and DREQ/~DACK. 
c 
EOF9 BO 00 c mov al,dma_omd_enable ; @nable p_dma controller 
EOFB £6 08 c out dma_ocommand, al 
c 
C ; The master clear command above has masked off all channels. Now, we ‘unmask’! 
C ; the RAM refresh dma_mask bit. p_dma RAM refresh begins for the first time! 
c 
EOFD BO 00 C mov al, dma_unmask_0 ; turn on RAM refresh channel 0 
EOFF £6 OA Cc out dma_mask_bit,al 
c 
C ; Program p_8253_1 of 18253 p_timer to proper value for RAM refresh. 
Cc 
E101 BO 74 C mov al,tiomd ; select p_dma refresh counter 
E103 E6 43 c out p_8253_otri, al 
c 
E105 BO 13 Cc mov al, ticount ; load p_dma refresh count 
E107 E6 41 c out p_8253_1,al 
E109 32 CO Cc xor al,al 
E10B E6 41 Cc out p_8253_1,al 
c 
c assume os:code, ds:nothing, es:nothing, ss:stack_ram 
Cc 
E10D 8C D7 c mov di,ss } save stack pointer 
E10F 8B EC c mov bp,sp 
E111 BA 0030 Cc mov dx, stack_seg 
E114 8E D2 C mov ss,dx 
E116 BC 0100 Cc mov sp,100h \ / 
c 
E119 50 Cc push ax } save error code 
c 
C j; Initialize & Disable 8259A Programmable Interrupt Controller, 
Cc 
E11A E8 E1DC R Cc call i_pic_init 
Cc 
C ; Install Vector Table. 3 set intiOlocn = code_seg:v_io, and 
c ; set intiDlocn = code_seg:v_parms. 
E11D E8 E1A0O R c eall i_vector 
Cc 
C ; Initialize Video. 
c 
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E120 


E123 
E124 


E127 
E12A 


E12D 
E12F 


E131 


E134 
E136 


E139 
E139 


E13C 
E13F 
E140 
E142 


E143 
E145 


E147 
E148 


E148 


E148 


E15D 


E15F 
E161 


E163 
E165 


E167 
E169 
E16B 
E16D 


E16F 
E170 
E173 
E175 
E177 
E17A 
EI7E 


E8 


58 
E8 


BE 
E8 


OA 
74 


E8 
8A 
E8 


E8 


BA 
EC 
34 
EE 


8E 


8B 


F4 


E4 


E148 R 


E5FA R 


DC45 R 
E5FA R 


E4 
08 


E626 R 
cy 
E643 R 


E619 R 


0378 


3F 


D7 
E5 


0040 
D8 


30 
0010 R 
10 


0003 
0010 R 
10 


67 


FO 
oD 


c8 
03 


30 
1C 
30 
1E 


BOOO 

D8 

A5 

0000 

26 0000 


call i_d_init 


; Display error message. 


pop ax 
eall DRomString 

mov si,cs:(offset fail_m) 
call DRomString 

or ah,ah 

jz i_fatal_ret 

call DColon 

mov al,ah 

eall DHexByte 


i_fatal_ret: 
call DCrLf 


restore error code 


display string at cs:si. 


display fail message. 


ah = 0? 
if so, no arguments 


display a colon 


display error code 


jOutput fatal error status for manufacturing tests 


mov dx,378h 
in al,dx 
xor al,03fh 
out dx, al 


. 
’ 
. 
’ 
, 
. 
’ 


parallel port address 

read last checkpoint value 

extract checkpoint number from status 
output "Not OK - number" 


assume cs:code, ds:nothing, es:nothing, ss:nothing 


mov ss,di 

mov sp, bp 
; ret 

hlt 


i_fatal endp 


’ 

, 

; Input: None. 
H Output: None. 
’ 

’ 


Trash: ax & cx destroyed. 


i_d_init proc near 


. 
, 


restore stack pointer 


Determine System Configuration from Switches and Enable Video. 


we we www mw mm em we ee ee ee Re Re ee ee em em ee we ee em ee ee ee em me ee ee em ee ee mew eee ee ee ee eee eee 


assume cs:code, ds:nothing, es:nothing, ss:stack_ram 


push ds 


; Initialize both boards. 


assume cs:code, ds:data, 


mov ax, data_seg 
mov ds,ax 


; Initialize monochrome board. 


} Save registers 


es:nothing, ss:stack_ram 


data_seg = 0040h. 


mov al,30h ; Switch _bits for monochrome. 
mov word ptr ds:[switch_bits],ax ; set data for monochrome, 
INT 10h 5; ah = 0 = v_set_mode. 


; Initialize color board. 


mov ax,0003h ; Sswitch_bits for not monochrome, 
mov word ptr ds:[switch_bits],ax ; set data for color. 
INT 10h ; ah = 0 = v_set_mode. 


; Determine system configuration from switches (low byte of switch _bits). 


in al,sys_conf_b H 
; 
; 
; 
and al,OFOh : 
; 
or al,00Dh ; 
mov el,al ; 
mov ch,03h ; 
and al,030h ; 
jz i_d_80x25 ; 
emp al,030h ; 
jnz i_d_ok ; if not, 


assume cs:code, ds:v_ran, 


push ds 

mov ax, para_mono 

mov ds,ax 

mov al,OA5h 

mov byte ptr ds:[0000h],al 
mov ah, byte ptr ds:[0000h] 
pop ds 


read high nibble of 

system configuration switches. 

bits #7 - #6: (number of FDU's)-1 

bits #5 - #4: monitor type 

mask off low nibble (keep high nibble) 
of low byte; clear high byte. 

ALWAYS 64k planar RAM and >= 1 FDU! 


cl is ok, excepts bits #5 & #4. 
initialize display to mode #3 (default). 


isolate display switches (bits #5 & #4). 
if zero, default to 80x25 color. 

is it the monochrome board? 

40x25 or 80x25 color ok. 


es:nothing, ss:stack_ram 


; save ds = data_seg = O0O40h. 
; satisfy assumptions 


; test pattern 

; if so, is monochrome there? 

; read monochrome RAM 

; restore ds = data_seg = OO4Oh. 
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E17F 
E181 


E183 
E185 


E187 
E187 
E18A 


E18D 


E18D 
E18F 
E191 


E194 
E196 
E198 
E19A 


E19A 
E19C 


E19E 
E19F 


E1A0 


E1A0 


E1A0 
E1A1 
E1A2 
B1A3 


E1A4 
E1A6 
E1A8 
E1AA 
E1AD 


E1B0 
E1B1 
E1B3 
E1B4 
E1B5 


E1B7 
E1BD 


80 
80 


1F 
C3 


1E 
06 
57 
56 


cy 
04 


07 
06 


E1 EF 
c9 20 


c5 
10 


F9 


06 0014 R FF54 R 
06 0008 R F85F R 


c8 
D8 
FEF3 R 


18 


FC 
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assume cs:code, ds:data, es:noth 

emp al,ah . 

jnz i_d_ 80x25 ; 

; 

mov ch,07h ; 

jmp short i_d_ok ; 

i_d_80x25: 

and cl,O0EFh ; 

or c1,020h : 


td ok's 


ing, ss:stack_ram 

if monochrome RAM is there, 
then the board must be there! 
if not, default to 80x25 color 
if there, we believe switches, 
initialize display to mode #7. 


reset bit #4 for 80x25 color. 
set bit #5 for 80x25 color. 


; Set system configuration (switch_bits) from switches. 


xor ah,ah ; 
mov al,ol ; 
mov word ptr ds:[switch_bits],ax ; 


Determine mode to initialize display monitor (f 


test al,020h ; 

jnz i_d_mode 

mov ch,O01h : 
i_d_mode: 


Initialize desire board (from switches). 


mov al,och H 
INT 10h : 
pop ds ; 
ret 

i_d_init endp 


ah = 0. 

get data from switches. 
save data from switches 

rom switches). 

does user want 40x25 color? 


if so, initialize mode #1. 


transfer display mode to al. 
ah = 0 = v_set_mode. 


restore registers 


Install Vector Table 


None, 
Output: None. 


es:nothing, 


ss:stack_ram 


save registers 


Trash ax = ex = 0 destroyed. 
H ett 
i_vector proc near 

assume ocs:code, ds:nothing, 

push ds ; 

push es 

push di 

push si 


Initialize Interrupt Vectors 00h through 07h to 


known routines. 


assume cs:code, ds:abs0, es:abs0, ss:stack_ram 

xor di,di ; Satisfy assumptions 

mov ds, di ; ds = es = ax = abs0_seg = 0 

mov es, di ; es:di = absO_seg:intOOlocn 

mov ax,ces:(offset ill_int) 3; ax = offset ill_int 

mov ex, (07h-00h) +1 ; load INT's OOh through O7h. 
i_vec0O: stosw ; es:di++ gets offset ill_int 

mov word ptr ds:[dil],cs ; es:di gets cs 

ine di > di++ 

ine di 

loop i_vec0O 3; until cx = 0. 

; load INT's 02h and O5h 

mov word ptr ds:[intO5locn],es:(offset s_int) 

mov word ptr ds:[intO2loen],ces:(offset n_int) 
; Initialize Interrupt Vectors 08h through 1Eh to known routines. 


assume cs:code, ds:code, es:abs0 
mov ax,cs ; 
mov ds,ax . 
mov si,es:(offset i_vec_tbl) : 
; 
mov cl, (1Fh-08h) +1 H 
i_vec8: movsw ; 
stosw : 
loop i_vec8 F 
; Initialize Interrupt Vectors 20h and above to z 
xor ax,ax ; 
H 
mov ex, ((03FO0h-0080h)/2) : 
3 
rep stosw 3 
pop si ; 
pop di 
pop es 
pop ds 


» ss:stack_ram 


satisfy assumptions 

ds = ax = cs 

ds:si = code_seg:i_vec_tbl 
es:di = absO_seg:int08locn 
load INT's 08h through 1Fh. 


(offset) 
es (segment) 


es:di++ gets ds:si 
es:di++ gets ax = 
until cx = 0. 


ero. 


ax = 0 

es:di = abs0_seg:int20locn 
clear 0:0080h to 0:03FOh 
don't blow away stack! 
es:di++ gets 0 


restore registers 
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Listing 


E1DC 


E1DC 
E1DF 
E1E1 


E1E2 
E153 
E1E5 


E1E6 
E1E8 


E1E9 
E1EB 
E1EC 


E1ED 


E1ED 


E1ED 
E1EF 
E1IF1 
E1F3 
E1F5 


E1F6 


0020 
13 


08 


OD 


EF 


EO 
FFFF 


EE EE EE ENE SEES I EOE SAE OS SRG DSSS OSS STS OAS AAO AREA RR GOS SCAMS eae n SoG AnU Reena oneneeaanseeacdnacne 


ret 


i_vector endp 


Initialize & Disable 8259A Programmable Interrupt Controller. 


’ 

’ 

i Input: None. 
; Output: None. 
; 
’ 


RR RR RO RR RE RR ee ee ee ee ee ee ee ee ee me ew eee eee ee eee 


es:code, ds:nothing, es:nothing, ss:stack_ram 


dx = pic_O (8259A ‘control! port) 
edge triggered, single, icw4 to follow 


dx = pic_1 (8259A ‘data' port) 
interrupt vector base address 


; Since we are single mode (no slave), skip icw3 


Trash: al & dx destroyed. 

; 

i_pic_init proc near 

assume 
mov dx, pic_0O ; 
mov al, pic_icw!1 H 
out dx, al 
ine dx ; 
mov al, pic_icw2 ; 
out dx, al 
; 

mov al, pic_icw4 ; 
out dx, al ; 
mov al, pic_off_msk ; 
out dx, al : 
ret 

i_plo_init endp 


Output Mask to 8259A Programmable 
Input: AL = mask pattern 


Output: Flags 


dx = pic_1 (8259A ‘data’ port) 
not special fully nested, buffered, 
master, normal end_of_int, 8086 mode 


mask all interrupts off for now 
dx = pic_1 (8259A ‘data' port) 


Interrupt Controller. 


Trash ah destroyed. 
H crn rrr er ern ete Pe mm ee Be em wee em ee em em ee em em em wm ew em www w eww ewe eee eee em emo ewe wee ema aea es 
i_out_mask proc near 

assume cs:code, ds:nothing, es:nothing, ss:stack_ram 

out pic_i,al ;output interrupt mask pattern 

mov ah, al ;save pattern for compar 

in al,pic_1 ;get mask from 8259 

emp ah, al ;the same ? 

ret ;return flags = result of compare 
i_out_mask endp 


8253 p_timer test for one p_timer 


Input: al = 
dx = port address of 
ah = Error codes: 0 


, 

’ 

J 

’ 

; 

; Output: z2f 
’ 

; 1 
; 2 
; 3 
, 

’ 


Trash: al, bx & ex destroyed. 


rte_chk proc near 
assume 
mov ah,al ; 
mov ex,OFFFFh ; 


; Register Bit Test (All Reset): 


mov bx, cx ; 
out p_8253_ctrl,al 4 
xor al,al ; 
out dx, al ; 
ine al ; 
out dx, al : 


rtc_chk_reset_lp: 


mov al,ah F 
and al,0COh ; 
out p_8253_ctrl,al ; 
in al,dx ; 
and bl, al 7 
in al,dx ; 
and bh, al . 
or bx, bx H 


Cl 


counter channel 


8253 p_timer control byte 


8253 p_timer data (counter) 


set (z status) if no error; reset (nz status) if error 


-> No Error! 
-> Low below time interval window. 


-> High above time interval window. 
-> No Response. 


es:code, ds:nothing, es:nothing, ss:nothing 


save control byte for later, 
time out for both Register Bit Tests. 


Count down from 100h until all bits reset. 


bx gets all its bits set. 
send 18253 p_timer control byte. 


al = 00h 

load low byte of p_timer count. 
al = Oth 

load high byte of p_timer count. 


get control byte for read. 
mask off all but top 2 bits. 
send latching control byte for read. 


get low byte of p_timer count. 
“and' low byte. 

get high byte of p_timer count. 
“and' high byte. 


is bx = 0? 
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E213 74 05 Cc jz rtc_ehk_reset_ok ; if so, we're done. 
E215 E2 EE Cc loop rte_chk_reset_lp ; if not, continue reading. 
c ; (Note: loops less than 16 times.) 
Cc 
E217 C rtec_chk_reset_err: ; time out. 
E217 B4 03 Cc mov ah,3 ; Error #3. (No Response.) 
E219 C3 c ret ; return nz status (loop leaves zf ok). 
c 
E21A C rtc_chk_reset_ok: 
Cc 
C ; Register Bit Test (All Set): Count down from Oh (FFFFh+1) until all bits set. 
Cc 
E21A 33 DB Cc xor bx, bx ; bx gets all its bits reset. 
Cc 
E21C 8A C4 Cc mov al,ah 3; get control byte for load. 
E21E E6 43 c out p_8253_ctrl, al ; send i8253 p_timer control byte. 
Cc 
E220 32 CO c xor al,al ; al = 00h 
E222 EE c out dx, al 3; load low byte of p_timer count. 
E223 EE c out dx, al 3; load high byte of p_timer count. 
c 
E224 C rte_chk_set_lp: 
E224 8A C4 c mov al,ah ; get control byte for read. 
E226 24 CO Cc and al,O0COh ; mask off all but top 2 bits. 
E228 £6 43 c out p_8253_ctrl,al ; send latching control byte for read. 
c 
E22A EC Cc in al,dx ; get low byte of p_timer count. 
E22B OA D8 c or bl,al ; “ort low byte. 
E22D_ EC Cc in al,dx ; get high byte of p_timer count. 
E22E OA F8 (0 or bh, al ; ‘or' high byte. 
c 
E230 81 FB FFFF Cc emp bx, OF FFFh 3; is bx = OFFFFh? 
E234, 74 05 c 4z rtc_chk_set_ok ; if so, we're done. 
E236 E2 EC c loop rtc_chk_set_lp ; if not, continue reading. 
Cc ; (Note: loops less than 16 times.) 
Cc 
E238 C rtc_chk_set_err: ; time out. 
E238 B& 03 c mov ah,3 ; Error #3. (No Response.) 
E23A C3 c ret ; return nz status (loop leaves zf ok). 
c 
E23B C rtc_chk_set_ok: 
Cc 
C ; p_timer Time Window Test: Test p_timer versus CPU & see if it falls within spec. 
c 
E23B 8A Ch c mov al,ah ; get control byte for read. 
E23D 24 CO Cc and al,OCOh ; mask off all but top 2 bits. ; 
E23F £6 43 Cc out p_8253_ctrl,al ; send latching control byte for read. 
c 
E241 EC c in al,dx ; get low byte of p_timer count. 
E242 8A D8 c mov bl, al ; save low byte. 
E244 EC c in al,dx ; get high byte of p_timer count. 
E245 8A F8 c mov bh, al ; save high byte. 
Cc 
E2457 8A C4 Cc mov al,ah ; get control byte for read. 
E249 24 CO c and al,OCOh ; mask off all but top 2 bits. 
E24B £6 43 Cc out p_8253_ctrl,al 3; send latching control byte for read. 
c 
E24D EC c in al,dx ; get low byte of p_timer count. 
E24E 8A C8 c mov el,al ; save low byte. 
E250 EC Cc in al,dx ; get high byte of p_timer count. 
E251 8A E8 Cc mov ch, al ; save high byte. 
Cc 
E253 2B D9 Cc sub bx, cx ; calculate time difference. 
c 
C ; Do Time Range Checking (4 <= bx <= 14). 
Cc 
E255 B4 02 c mov ah,2 ; Error #2. (High above time window. ) 
E257 83 FB OE c emp bx,14 
E25A 77 09 Cc ja rtc_chk_high ; return nz status. (ja has zf reset.) 
c 
E25C FE CC c dec ah ; Error #1. (Low below time window.) 
E25E 83 FB 04 c emp bx,4 
E261 72 02 c jb rte_chk_low ; return nz status. (jb has zf reset.) 
C 
E263 FE CC Cc dec ah ; Error #0. (No Error!) return z status. 
c 
E265 C rte_chk_high: 
E265 C rte_echk_low: 
E265 C3 Cc ret 
Cc 
E266 C rte_chk endp 
c 
CC jee n nnn ne nn nn nnn nn enn nn 
Cc 3 RAM (64k) Storage Test 
c 3 
Cc ; Input: dx = segment of RAM to be tested 
Cc 
© ; Output: zf = set (z status) if no error; reset (nz status) if error 
Cc 4 es:di = dx:di = failing RAM location if error; else di = 0. 
Cc 3 ax = test pattern (what was written). 
| bx = if error, what was read. 
G ¢ ex = number left to test if error; else cx = 0. 
Cc 3 
Cc ; Trash: None 
a a a a a a a a a a eee 
c 
E266 C memtst proc near 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
c 
E266 B9 8000 c mov ex,08000h ; get word count 


eee orc PSNR PSE AR A EE SS EE AE SE I ERE SE SR 
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E26D 

E26D 8B C7 
E26F AB 
E270 E2 FB 
E272 8E DA 
E274 33 DB 
E276 B9 8000 
E279 

E279 8B 07 
E27B 3B C3 
E27D 75 2C 
E27F 43 
E280 43 


E2 86 

E286 8B C7 
E288 F7 DO 
E28A AB 
E28B E2 F9 


E290 

E290 8B 07 
E292 FT7 DO 
E294 3B C3 
E296 75 OF 
E298 43 
E299 43 
E29A E2 F4 


E2A4 OB CO 
E2A6 C3 
E2A7 

E2A7 FT DO 
E2A9 FT D3 
E2 AB 

E2AB 93 
E2aC C3 
E2AD 

E2AD 

E2AD 

E2AD 


E2AD 4F 70 74 69 6F 6E 
61 6C 20 52 4F 4D 
20 61 74 20 00 


E2BE 03BC 
E2CO 0378 
E2C2 0278 
E2C4 0000 
E2C6 0052 
E2C8 0050 
E2CA E545 R 
E2CC F000 
E2CE 0016 
E2D0 CC67 R 
E2D2 F000 
E2D4 FA6E R 
E2D6 FO0OO 
E2D8 C060 R 
E2DA F000 
E2DC 0000 


mov es,dx 

xor di,di 
memtst_wi: 

mov ax, di 

stosw 

loop memtst_wi 

mov ds,dx 

xor bx, bx 

mov ex,08000h 
memtst_r1: 

mov ax, [bx] 

emp ax,bx 

jne memtst_err 

ine bx 

ine bx 

loop memtst_ri 

mov ex,08000h 
memtst_w2: 

mov ax, di 

not ax 

stosw 

loop memtst_w2 

mov ex,08000h 
memtst_r2: 

mov ax, [bx] 

not ax 

cmp ax, bx 

jne memtst_err_ce 

ine bx 

ine bx 

loop memtst_r2 

mov ax,0 

mov ex,08000h 

rep stosw 

or ax,ax 

ret 
memtst_err_c: 

not ax 

not bx 
memtst_err: 

xchg ax, bx 

ret 
memtst endp 
code ends 
include pwrup0.asm 
; Filename: PwrupO.sre 
; 
; 
; 
H includes Diagnostics 
‘ Cold Boot 
; Device Drivers 
H 
pesssessssssssssssseeseeeeeeeeeeeeeeeee2 
code segment public 'ROM! 

assume 
pO_data1 proc near 
opt_ROM_m db "Optional ROM at 
p_tbl dw prt_data_a 

dw prt_data_b 

dw prt_data_e 

dw 0 
scece_tbl dw scce_ctl_b 

dw sece_ctl_a 
alt_ret dw i_alt_restart 

dw code_seg 
mastab dw ((mt_end)-(mastab) ) 

dw kb_data_table 

dw code_seg 

dw font_lo_8x8 

dw code_seg 

dw font_lo_8x16 

dw code_seg 

dw 0 


ROM BIOS 
Listing 


; (64k = 32k * 2 bytes/word) 
; es:di = address 


j;data = offset 


;ds:bx = address 
3; word count 


;read data 
;verify data 


;next address 


5 word count 

; address is already ok 
; data = offset 

3 complement it 

;fi111 memory 


; word count 


; read data 
; complement 
> verify 


; update address 
; to clear memory 


> word count 


;set ZF 


; error during complemented 
; address test 


jreturn registers as specified 


This module includes temporary hardware initialization. 


es:code, ds:nothing, es:nothing, ss:nothing 


', NUL 


printer in port address space 
always on mother board. 

printer in port address space 
no printer 


wee we we we 


3 rs232 SCC channel B 
3 rs232 SCC channel A 


; O0Oh Z8000 restart sequence offset 
; O4h Z8000 restart sequence segment 


; O0Oh master table byte length 


; O2h kb xlation table offset 
; O4h kb xlation table segment 


; 06h ist 128 char.s 8x8 font offset 
; 08h 1st 128 char.s 8x8 font segment 


; OAh ist 128 char.s 8x16 font offset 
; OCh 1st 128 char.s 8x16 font segment 


; OEh 2nd 128 char.s 8x16 font offset 
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Listing 


Ra hE RS SSW SER GR REE I LTE EDIE TD SLE LIISA LE LTE DDD LED ELE, 


E2DE 0000 

E2EO0 0000 

E2E2 0000 

E2E4 

E2E4 

E2E4 

E2E4 B8 0040 
E2E7 8E D8 

E2E9 8E CO 

E2EB 9C 

E2EC FA 

E2ED BA 0061 
E2FO BO 40 

E2F2 EE 

E2F3 33 C9 

E2F5 E2 FE 

E2F7 Ba 01 

E2F9 E8 E581 R 
E2FC 89 OE 0072 
E300 33 C9 

E302 E2 FE 

E304 

E3045 ES 64 

E306 a8 01 

E308 74 09 

E30A E4 60 

E30C 3C AA 

E30E 75 F4 

E310 A3 0072 R 
E313 

E313 E2 EF 

E315 33 C9 

E317 E2 FE 

E319 C7 06 0084 
E31F 8C OE 0086 
E323 B8 OO1E R 
E326 A3 001A R 
E329 A3 OO01C R 
E32C A3 0080 R 
E32F C7 06 0082 
E335 80 26 0017 
E33A 80 26 0018 
E33F B4 05 

E341 E8 E581 R 
E344 33 C9 

E346 

E346 E4 64 

E348 A8& 01 

E34A 75 05 

E34C E2 F8 

E34E EB 11 90 
E351 

E351 E4 60 

E353 A8& 01 

£355 74 OA 


R 


bo] 


mo 


E2CE R 


OO03E R 


DF 
FE 


AAAANAANAANAANAAANAANDANRAARAAARAADAARAARAANAANAAANRANDARAANAANAAN AMD AANANAMAAANAAANANNAANDAANAANANAANNANAANAAARANANAANRANANQAAaAQANANAMNAANAANANAANAANQANANAANDAANAANANNAANANANAANAANANAAANAAAA 


dw 

dw 

dw 
mt_end label 
pO_datal 


Initialize the basic hardware, 


0 ; 10h 2nd 128 char.s 8x16 font segment 
0 3; 12h soft font utility offset 
0 ; 14h soft font utility segment 
; 16h ete... 
word 
endp 


Set up the interrupt pointers, 
Initialize all RAM variables, 


Initialize the disk drivers, 


’ 
’ 
, 
: Clear the screen, 
’ 
’ 


and perform the cold boot. 


el 


proc 


assume 


mov 
mov 
mov 


near 


es:code, ds:data, es:data, ss:stack_ram 


ax,data_seg ; 
ds,ax 
es, ax 


; Initialize Keyboard Controller. 


pushf ; save flags and 
eli ; disable interrupts 
mov dx, p_ketrl : dx = p_kotrl 
mov al,40h ; remove keyboard reset 
out dx,al 
xor Cx, cx ; delay 
loop $ 
mov ah,1 ; enable self test 
call kb_cmd_send 
mov word ptr ds:[reset_flag],cx : 
xor cx, cx ; delay 
loop $ 
; Flush any keyboard scan code and store AAh if we get it. 
kb_flush: 
in al,kb_status ; get 8041 status 
test al,1 ; test output buffer bit 
jz kb_flush_back ; jump if no character pending 
in al, p_kscan ; get scan code from data port 
cmp al,OAAh ; verify keyboard present 
jne kb_flush 
mov word ptr ds:[reset_flag],ax ; keyboard present 
kb_flush_back: 
loop kb_flush jloop if zero 
xor ex, cx ; delay 
loop $ 


; Initialize System Variables. 


mov 
mov 


word ptr ds:[master_tbl_ptr+0000h],cs:(offset mastab) 
word ptr ds:[master_tbl_ptr+0002h],cs 


; Initialize Keyboard Driver Variables. 


mov 
mov 
mov 
mov 


mov 


ax,ds:(offset kb_buffer) . 
word ptr ds:[buffer_head],ax H 
word ptr ds:[(buffer_tail],ax ; 
word ptr ds:[buffer_start],ax ; 


word ptr ds:[buffer_end],ds:(offset kb_buffer)+(size kb_buffer) 


; Assume first not Deluxe Keyboard 


and 
and 


satisfy assumptions 


pointer to beginning of buffer 
keyboard output pointer offset 
keyboard input pointer offset 
keeps beginning of buffer 


byte ptr ds:[kb_flag],(not num_lock_mode) 
byte ptr ds:[kb_flag_1],(not dlx_kb) 


; Send command to request ID code from keyboard. 


mov 
eall 


xor 
kb_type_wait: 


; O1H bit set, 


ah,0O5H ; 
kb_emd_send 4 


ex, cx ; 


al,kb_status 
al,1 
kb_type_read 
kb_type_wait 
kb_not_dlx 


al,p_kscan ; 
al,O1H : 
kb_not_dlx 


Read keyboard type 


set up timeout count 


send command. 


get port status 


data byte available? 
so, go read it 
else wait awhile longer. 

default to non-dlx 


if 


timeout, 


read ID byte.. 


deluxe kbd. 


so initialize to Deluxe Keyboard. 


bit set? 


id 


Sd 


E357 80 OE 0017 R 20 
E35C 80 OE 0018 R 01 


E361 
E361 9D 
E362 BO 14 


E376 8C C8 
E378 8E D8 
E37A 32 DB 


E382 

E382 AD 
E383 OB CO 
E385 74 14 
E387 8B DO 
E389 BO A5 
E38B RE 
E38C 86 C& 
E38E EC 
E38F 3A C&A 
E391 75 EF 
E393 8B C2 
E395 AB 


E39B BF 0000 R 


E39E BA O3FA 


E3A1 EC 
E3A2 A8& F8 
E3A% 75 O7 


E3A6 B8 03F8 


E3AA 80 C3 02 


E3AD 

E3AD BA O2FA 
E3BO0 EC 

E3B1 A8& F8 
E3B3 75 O07 


E3B5 B8& 02F8 


E3B9 80 C3 02 


E3BC 

E3BC E4 66 
E3BE A8 20 
E3CO 74 08 
E3C2 BE E2C6 R 
E3C5 A5 

E3C6 = A5 


E3C7 80 C3 O04 


E3CD EC 
E3CE A8 OF 
E3D0 75 03 


APAAVAAAGAAAAAAAAAAAAVDAUAAAAAAAAAAANANAAAAAAAAARAANRAAANAAAANRARAANAAAAAAAANAAARARQDAAAAAAAAAAA A AAANAAARAAAAAAAAAAaaA 


or 
or 


kb_not_dlx: 


popf 


ROM BIOS 
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byte ptr ds:[kb_flag],num_lock_mode 


byte ptr ds:[kb_flag_1],dlx_kb 


restore interrupt- 
enable state. 


Initialize Printer & Communication (RS-232) Driver Variables. 


mov 
nov 
mov 
rep 


mov 
mov 
mov 
rep 


al,14h 

di,ds:(offset printer_t_out) 
ex,4 

stosb 


al,O1h 

di, ds: (offset serial_t_out) 
ex,4 

stosb 


Determine Parallel Port Configuration. 


assume 


mov 
mov 


xor 


mov 
mov 


i_prt_loop: 


lodsw 
or 


jz 


mov 
mov 
out 
xchg 
in 
cmp 
jnz 


jmp 


i_prt_exit: 


i_ 


. 
, 


H 


printer default timeout = 20 
es:di gets al 
printer default timeout = 01 


es:di gets al 


es:code, ds:code, es:data, ss:stack_ram 


ax,cs 
ds, ax 


bl, bl 


di,es:(offset printer_addr) 
si,ds:(offset p_tbl) 


ax,ax 
i_prt_exit 


dx, ax 
al,OA5h 
dx,al 
al,ah 
al,dx 
al,ah 
i_prt_loop 


ax,dx 


bl,040h 


i_prt_loop 


wee we we wee we we wee we we we 


satisfy assumptions 
clear high byte of switch bits 


es:di points at printer_base 
addresses of printer ports 


ax gets ds:si port address. 
valid port address? 
exit if invalid port address 


transfer to data register 
load test pattern 

output test pattern. 

mov ah,al; trash al; & delay. 
input test pattern back. 

what we read = test pattern ? 
if not, loop as port is absent 
else, printer port is present 
retrieve port address 

es:di gets ax. 


add to high byte of switch bits 


will go around loop 3 times 


Determine Communication (RS-232) Configuration (SCC 28530 & INS8250's). 


no_com_a: 


mov 
in 
test 
jnz 


i_no_com_b: 


in 
test 
jz 
mov 
MOV sw 
mov sw 


add 


i_no_scecs: 
Determine Game Card Configuration. 


3 


mov 
in 
test 
jnz 


add 


di,es:(offset rs232_addr) 
dx, com_id_a 

al,dx 

al,OF8h 

i_no_com_a 


ax,com_data_a 


b1,002h 


dx, com_id_b 
al,dx 
al,OF8h 
i_no_com_b 


ax, com_data_b 


b1l,002h 


al, sys_conf_a 
al,020h 
i_no_secs 


si,ds:(offset scec_tbl) 


bl, 2#(002h) 


dx, game_card 
al,dx 

al,OFh 
i_no_game_card 


b1,010h 


wee wee we we 


we Ge we we 


es:di points at rs232_base 


read interrupt I.D. register 
for first 8250 port. 


bits #3-7 are always low if 
installed. 


if present, load address of 
first 8250 data port. 

es:di gets ax. 

add to high byte of switch_bits 


es:di points next empty word 


read interrupt I.D. register 
for second 8250 port. 

bits #3-7 are always low if 
installed. 


if present, load address of 
second 8250 data port. 

es:di gets ax. 

add to high byte of switch_bits 


read switch settings to test 
for SCC 28530 chip 

bit #5: SCC chip installed 
if not, don't load SCC table 
SCC 28530 control ports 
always 2 ports 

es:di gets ds:si (twice) 


add to high byte of switch_bits 
es:di points next empty word 
get game card address. 

bits #0-3 are low if installed 


skip, if not present 


add to high byte of switch_bits 
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E3D5 


E3D5 


E3DA 
E3DC 
E3DF 


E350 
E3E2 
E3E5 
E356 


E3E7 
E3E9 
E3 EB 


E3ED 
E3F0 
E3F0 


E3F3 
E3F5 
E3F6 
E3F8 


E3FA 


E3FD 
E3FD 
E3FF 


E401 
E405 


E407 
E4OA 


E40D 
EOF 


E412 
E415 


E417 
E41A 
ERIC 


26: 


33 
8A 
D1 


50 
B1 
D3 
03 
59 
E8 
7T4 
E9 
53 
26: 
26: 
26: 
5B 


EB 


81 


88 1E 0011 R 


FC 
0021 


61 
0020 


c800 
DB 
F6 


3C AA55 
43 


E2AD R 
E5SFA R 


co 
E632 R 


OE20 
10 


0040 
co 
F6 


02 


C7 06 0067 R 0003 
8C 1E 0069 R 
FF 1E 0067 R 


04 


C3 0080 


AAAADNDDDAADAARDAARAAAAAGAADADAAAAMRAMNAMRANAAARMRAANAAANQAANMANDNANAANAANMGnANAAANAANANNANANANAMDAANAANANANANANaAANAeaAGaNnaNaANAAAANANaAAANAANAAAAA 


i_no_game_card: 


; Initialize High Byte of switch bits. 


mov 


byte ptr es:[switch_bits+1],bl 


; save high byte of switch_bits 


; Initialize 18259A PIC with appropriate interrupt mask and enable interrupts. 


H mov 
mov 
mov 
out 


; Send specific 


mov 
mov 
out 
sti 


al,10111100b 
al,11111100b 
dx, pic_i 

dx, al 


end of interrupt (SEOI) to pic * 
al, pic_seoi_1 


dx, pic_O 
dx, al 


; Initialize Parallel Printer Interface. 


mov 
xor 
INT 


ah,1 
dx,dx 
17h 


; p_timer & kb & dsk at this point 
; p_timer & kb only at this point. 
3; now set proper interrupt mask 


command port for keyboard. 


; specific end of interrupt 
; to pic ‘command' port. 


; enable interrupts 


3; initialize printer... 
* sacport 0 


Initialize all 4 (2) 28530 Serial Communication Controller. 


; 
mov 

rs_init: 
mov 


ex,4 


ax,1111111111100011b 


14h 


NOTE: Special function code (FF) for power up ONLY initialization of 8530 


; initialize SCC RS-232 
; 9600 baud,none,1 stop & 8 data 
; port number = loop - 1 


mov 


rom_scan_loop: 
mov 
xor 


cmp 
jne 


mov 
eall 


xor 
eall 


mov 
INT 


mov 
mov 
xor 


; Now: 


xor 
mov 
shl 


push 
mov 
shr 
add 
pop 


eall 


jz 
jmp 


rom_chksum_ok: 
push 


mov 


mov 
eall 


pop 
jmp 


rom_scan_next: 
add 


assume cs:code, ds:nothing, es: 
bx,0C800h 

ds, bx 

si,si 


word ptr ds:[si],0AA55h 
rom_scan_next 


si,os:(offset opt_ROM_m) 
DRomString 


ax,ax 
DHexLong 


ax, (OEn#100h)+' ' 
10h 


ax, data_seg 


nothing, ss:nothing 


; load starting segment 


; bx has pending segment 
; offset 0000h 


; indicate ROM detected 


; ds:ax points at ROM 


; put out SPACE 


; satisfy assumptions 


es,ax ; for es in rom_check 

si,si ; ds:si points to ROM to check 

ds:si = pointer to ROM to be tested 

bx = ds = pending segment of ROM under test 

es: = data segment 

assume cs:code, ds:nothing, es:data, ss:nothing 

ax, ax ; clear al 

ah, byte ptr ds:[si+2] ; ax = (ROM length/512) * 256 

ax,1 3 ax = (ROM length/512) ® 512 
; ax = ROM length in bytes 

ax ; save ROM length 

e1,4 

ax,cl ; advance segment for next ROM 

bx,ax ; by the number of paragraphs 

ex ; restore ROM length in cx 


rom_checksum_cnt 

rom_chksum_ok 

rom_err 

bx 

word ptr es:[io_rom_init],0003h 
word ptr es:[io_rom_seg],ds 
dword ptr es:[{io_rom_init] 


bx 


short rom_scan_exit 


bx, (800h/ 10h) 


get the checksum of the cx- 
byte ROM. 

OK if the checksum was zero 
error the checksum wasn't zero 


; save the segment for next ROM 


; initialize the ROM 


; restore segment for next ROM 


; add 2k to the pending segment 


E454 
E456 


E458 
EQ5B 
EQ5F 


E461 
E464 


E467 


EM6A 
EM6F 
EATS 


E476 
E479 
EX7TA 


E47D 


EA47D 


ENTE 
E481 


E482 
E484 


E485 
E487 
E489 
EA 8F 


E493 


81 
7C 


BE 
E8 


E8 


2E 
80 
TS 


BC 
FA 
E8 


33 
33 
33 
33 
cD 


BE 
E8 


BD 
B8 
33 
8E 
8E 
BB 


B9 
33 


FB F600 
AQ 


co 
D8 


0104 
06 0106 
1C 


DD28 R 
E5FA R 


CFOF R 


8E 1E E5F2 R 
3E 0075 R 00 
OT 
0100 


E1A0 R 


0021 


FC 


co 

D8 

06 0060 R F860 R 
OE 0062 R 
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rom_scan_exit: 


emp bx, OF600h ; are we done? 

jnge rom_scan_loop ; if not, continue 
} Sallie ee en ee) 
; HDU Test 


’ 
assume cs:code, ds:abs0, es:nothing, ss:stack_ram 


xor ax,ax ; satisfy assumptions 
mov ds,ax 


; Check int 41h to see if any one installed a HDU parameter table pointer, 


mov ax,word ptr ds:[(4#41h)+0000h] 
or ax,word ptr ds:((4#41h)+0002h] 
jnz i_hdu_ok ; if so, let them be... 


; If not, call HDU initialization routine. 


mov si,cs:(offset i_hdu_m) 
call DRomString ; print test message 
call h_init 


assume cs:code, ds:data, es:nothing, ss:stack_ram 


mov ds,word ptr os:[set_ds_word] ; Satisfy assumptions 

emp byte ptr ds:(hf_num],0 } number of hard disks. 

jnz i_hdu_ok ; if ok, leave everything alone. 

mov sp,100h ; re-initialize stack 

oli ; disable interrupts 

call i_vector ; re-install old vectors 
i_hndu_ok: 


; Clean Up after Option ROM's 


eli ; disable interrupts 
mov dx, pic_1 ; get current interrupt mask 
in al,dx 
; and al,10111100b ; p_timer & kb & dsk at this point. 
and al,11111100b ; p_timer & kb must be on at this point. 
out dx,al 


assume cs:code, ds:abs0, es:nothing, ss:stack_ram 


xor ax,ax 
mov ds,ax 
mov word ptr ds:[int18loon+0000h],cs:(offset bt_int) 
mov word ptr ds:[int18locn+0002h],cs ; (ROM BASIC not available) 
sti ; enable interrupts 

; wee ww tm tm mee wee et em mm mmm em em ee ee Pm em ee mem meee mee wm mm mm mw em eww mw eee em ewww eee 

; FDU Test 


; Initialize Floppy Disk Controller and related Driver Variables 


xor ax, ax ; initialize the disk routines 
xor bx, bx 

xor Ox,cx 

xor dx,dx 

INT 13h 


; Dummy Disk Attachment Test to Spin Up Drive for INT 19h (boot-strap). 


mov si,ces:(offset i_fduA_m) 
eall DRomString ; print test message 
mov bp,3 ; loop counter 
L_fdu_lip: 
mov ax,0201h ; read one sector 
xor bx, bx 
mov ds, bx 
mov es,bx ; xfer_segment 
mov bx, 7C00h ; xfer_offset 
mov ex,0001h ; track 0; sector 1 
xor dx,dx ; head 0; drive 0 
push bp ; save retry count 
push ax ; Save return registers 
push es 
INT 13h ; bx, cx, dx, & ds preserved 
pop es ; restore return registers 
pop ax 
pop bp ; restore retry count 
jne i_fdu_ok ; error during read? 
dec bp ; if so, decrement retry count 
jnz i_fdu_lp ; and try again 
mov si,es:(offset i_fdu_not_m) ; drive not ready message. 


ener nrc rn SSS SS SSS 


8-103 


ROM BIOS 
Listing 


_S ASN ESA ESET SIRES ET IES SRE ST IIS GLEE IBLE EDEN IAB CELE LE RE ID TEL ELE TALE ELLE SESE EE LEE LEE EDEL GALILEE 


E4¥C8 EB 
ECA 
EXCA BE 
E¥CD 
EXCD £8 
E4¥DO BA 
E4D3 EC 
E4D4 OC 
E4D6 EE 
E4D7 
E4D7 9C 
E4D8 50 
E4D9 53 
EMDA 51 
EXDB 52 
EMDC 55 
E4DD 57 
EWDE 56 
EXDF 1E 
EXEO 06 
EXE1 2E: 
EXE6 At 
E4EQ 3C 
EXEB 73 
EXED EB 
E4FO 
ENXFO FA 
EXF1 33 
E4F3 8E 
EXF5 8B 
EAFQ 52 
EMFA A2 
E4FD BA 
E500 BO 
E502 EE 
E503 B9 
E506 
E506 80 
E50B 74 
E50D £2 
E50F EB 
E511 
E511 58 
E512 A3 
E515 50 
E516 FB 
E517 £8 
E51A BE 
E51D £8 
E520 33 
E522 
E522 Bu 
E524 CD 
E526 7% 
E528 32 
E52A CD 
E52C 0c 
E52E 3C 
E530 74 
E532 BO 
E534 
E534 Bu 
E536 CD 
E538 3C 
E53A 75 
E53C 8 
E53F FA 
E540 C6 
E545 
E545 BA 
E548 BO 
E54A EE 
E54B Bg 
E54E E2 


03 


DDIF R 


E5FA R 


0061 


30 


8E 1E E5F2 R 


co 
D8 
16 0000 


0000 


80C1 
01 


OOFF 
3E 0000 01 
o4 


FT 
56 


06 0000 OF 


80C1 
01 


OOFF 
FE 


AANAANAANDAAAANDANQ GMA QDADAAMRANNMAANANANAANANAANANANQAANAAAANAANDANRANANANANAANANNAAAAARANNANMDAANAAANAANANANNAANQanaNANaAANANAANANAANANANAANaaAQgaganaaANaAanaanaaanna 


i 


i_ 


1 


i_ 


2 


i_ 


i_ 


jmp 


fdu_ok: 
mov 


fdu_end: 
eall 


short i_fdu_end 


si,ces:(offset i_fdu_rdy_m) ; drive ready message. 


DRomString 


Initialize & enable NMI's (parity register). 


mov 
in 
or 
out 


dx, p_ketrl 

al,dx 

al,030h ; enable bits #5 & #4 
dx,al 


If alternate processor is available, let user select which one to use. 


alt_cpu: 
pushf 
push 
push 
push 
push 
push 
push 
push 
push 
push 


alt_cont: 
eli 
assume 


xor 
mov 
mov 
push 
mov 


mov 
mov 
out 
mov 


alt_test: 
cmp 
je 
loop 


jmp short i_alt_end 


alt_found: 
pop 
mov 
push 
sti 
eall 
mov 
call 
xor 


alt_ing: 
mov 
INT 
jz 


i_alt_echo: 


i_ 


mov 
INT 
emp 
jne 
eall 


eli 
mov 


alt_restart: 
mov 
mov 
out 


mov 
loop 


; preserve state for int 19h 


es:code, ds:data, es:nothing, ss:nothing 


satisfy assumptions 
get result of keyboard test 


ds,word ptr cs:[set_ds_word] 
ax,word ptr ds:[reset_flag] 


al,OAAh is keyboard attached? 
i_alt_cont jump if yes (continue) 
i_init_end jump if no (in mfg) 


; disable interupts 


es:code, ds:abs0, es:nothing, ss:nothing 


ax,ax ; set up absolute zero address 
ds,ax ; for alternate cpu semaphore 
dx,word ptr ds:0 ; save word at 0:0 

dx 

byte ptr ds:0,al ; request alt cpu id (0:0 = 0) 
dx,80Cih ; Z8000 liaison port 

al,1 ; AL=1 starts Z8000 

dx, al ; try to boot 28000 

ex,OFFh ; loop counter 


byte ptr ds:0,01th 
i_alt_found 
i_alt_test 


has the semaphore changed? 
jump if yes (28000 id = 1) 
wait for Z8000 to gain control 
jump: no alternate cpu 


ax ; restore word at 0:0 
word ptr ds:0,ax 
ax ; resave for future pop 

; enable interupts 
DCrLf 
si,es:(offset i_alt_select_m) ; ask user if alt. cpu used 
DRomString 
dx, dx ; for int 14h 
ah,1 ; has a key been struck? 
16h 
i_alt_ing ; if not, stay in loop 
ah,ah ; if so, get the keystroke 
16h 
al ,00100000b ; force lower case 
al,"y* ; did user mean "yes" 
i_alt_echo ; jump if yes 
al,'n' ; force "no® 
ah,OEh ; echo "y" or "n" 
10h 
ai, “y* ; was answer "yes" 
i_alt_end ; jump if no 
DCrLf 

; disable interupts 
byte ptr ds:0,0Fh ; tell Z8000 to take over 

; entry for re-entering Z8000 (assume 0:0 setup) 

dx,80Cih ; Z8000 liaison port 
al,1 ; AL=1 starts Z8000 
dx,al ; pass control to Z8000 
ex, OFFh ; loop counter 
$ ; wait for Z8000 to gain control 


id 


E550 
E552 
E554 
E559 
E55B 
E55D 
E55F 


E562 
E563 
E565 


E567 
E567 
E568 
E56B 


E56C 
E56C 
E56F 
E571 


E572 
E573 
E574 
E575 
E576 
E577 
E578 
E579 
ESTA 
E57B 


E57C 
ES7F 


E5 81 


E581 
E581 
E581 
E5 83 
E5 85 
E587 
E589 
E5 8B 
E58C 


E58C 


E58C 


E58C 


| 
tq 


33 
8E 
80 
12 
8C 
8E 
BD 


EA 


co 

D8 

3E 0000 10 
oc 

c8 

co 

E2CA R 


0000 
0000 


E4 
A8 
15 


BA 
E6 
C3 


0000 


E619 R 
19 


QAAAM*NIAANANAANAAAAA 
++ +t 


ENN AAAS AIS RE ASAT S SCAG AS GOS HARASS NGon ana ee RG aaeSsKheeea aaa uGESeeaaaes 


; End of Initial 


i_alt_end: 
pop 
mov 
sti 


i_init_end: 
mov 
mov 
out 


pop 
pop 
pop 
pop 
pop 
pop 
pop 
pop 
pop 
popf 


call 
INT 


peinit endp 


; Send command in AH to keyboard interface processor, 


kb_cmd_send proc 


kb_omd_wlup: 


; we're here only 


ax,ax 
ds,ax 

byte ptr ds:0,10h 
i_alt_end 

ax,cs 

es,ax 

bp,offset alt_ret 
0,0 

OEAh 

0 

0 


ization, 


ax 
word ptr ds:0,ax 


dx,0378h 
al,80h 
dx, al 


near 


. 
’ 
. 
’ 
. 
’ 
. 
’ 
. 
’ 
, 
. 
’ 
. 
’ 
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if Z8000 released control 
reset segment register 

to absolute zero 
is a jump requested? 
no, try to boot (or crash) 
pass return registers so that: 

jmp es:[bp] 

restarts Z8000 as desired 

intersegment direct jmp to 0:0 


restore word at 0:0 


enable interupts 


printer port 
OK status 
tell mfg tester 


restore state for boot 


go to boot-strap routine 


AX is used. 


in al,kb_status ; wet 8041 port status 
test al,10b ; ready to receive? 
jnz kb_omd_wlup 
mov al,ah ; ready, send command 
out p_kscan, al 
ret 
kb_omd_send endp 
code ends 
include pwrup2.asm 
pSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS SSS SS ess seeseeeere 
; Filename: pwrup2.sre 
i 
; This module includes 8259 Interrupt, Video Controller, 8087 
. NPU, and 8253 & MM58174 Clock tests. 
’ 
pRSSSSSSSS SSS SS Sess esse sess cesses eeesssssseseesseeeseseeseseessseeeeree 
code segment public 'ROM! 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
pERRSSSS SSS Sesser scssssssssssseseese sess sere sssseeeeesseseseeeseesesees 
; Note We are called from ill_int ONLY (see vector.src), and 
; stack looks like this: 
H High Address 
; | ---------------- ee | <-- sp before ill_int trap 
; (10) | return fsw flags | 
; | pe en enna enn nnen ne 
’ 
; (OE) | return cs segment| 
; | ew ne anne een ne ne | 
’ 
; (0c) | return ip offset | 
; | --------- +e eee | <-- sp after ill_int trap 
; (OA) | ax H 
; | ew ne nn ne n----- eee | 
; (08) | ds | 
; | ------------------ | <-- sp after ill_int pushes 
; (06) | near call here | 
; | ------------------ | <=- sp after ill_int calls ill_trap 
; (04) | ax | 
; | eenennnn---------- | 
; (02) | dx | 
; | mennnnnnn--------- | 
; (00) H si | 
: | ------------------ | <-- sp after ill_trap pushes 
; Low Address 
pRSS SSS SSS ess ses ssseessssssssssssssssesesssseeseseesseeeseseeseeeeeeese 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
ill_trap proc near 
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E58C 
E58D 
E5 8E 


E5 8F 


E592 
E595 
E598 


E59B 
E59D 
E5A1 


E5A5 
E5A6 
E5 A8 
E5 AB 
E5AC 


E5 AE 
E5B1 


E5B4 
E5B7 
E5BA 
E5 BD 
E5CO 
E5C1 


E5C2 
E5C3 


E5C4 
E5C7 
E5C9 
E5CC 
E5 CE 
E5D0 
E5D2 
E5D5 


E5D5 


E5D5 


E5D5 
E5D5 
E5D7 
E5DC 
E5DF 
E5 E2 


E5E5 


E5E5 


8c 


26: 


BE 
E8 
EB 


EF4F R 


E5C4 R 
DC1B R 
E5FA R 


F4 


8E 5C OE 
8B 74 OC 


04 
E643 R 
c6 


DC34 R 
E5FA R 


E632 R 
DC3A 


E5FA 
E5 C4 


www 


D8 
88 26 0015 R 


DC45 R 
ESFA R 
35 90 


ANARANARAAAN ADD AANA AANAADAAANDDAAAANRANDAANAANAAANRADANAADAAANAANAAANARAARAAANRAAANARANAAAANANANAAMAAMAMAANAAMAANAANNANANANANAAAANAANAANANANAAANAANAAAANANAANAAAANA 


; Turn off floppy disk drives. 


push ax ; save registers 
push dx 
push si 
eall stop_disk ; destroys ax & dx 
call i112 1n 
mov si,es:(offset ill_m1) ; part 1 of message 
eall DRomString 
mov si,sp 
mov ds,word ptr ss:[si+0Eh] ; es past si,dx,ax,ret,ds,ax,ip 
mov si,word ptr ss:[({si+0Ch] ; ip past si,dx,ax,ret,ds,ax 
dec si ; si points to interrupt number 
mov al, byte ptr ds:[si] ; print illegal interrupt number 
call DHexByte 
dec si ; si points to interrupt instr. 
mov ax, si ; save pointer 
mov si,es:(offset ill_m2) ; part 2 of message 
eall DRomString 
call DHexLong 3; print illegal cs:ip = ds:ax 
mov si,es:(offset il1_m3) ; part 3 of message 
call DRomString 
call ill_in 
pop si ; restore registers 
pop dx 
pop ax 
ret 
ill_ln: eall DCrLf ; prints a line of ‘#'s 
mov d1,42 
ill_lp: mov ax, (OEh#100h)+('#') 
INT 10h 
dec dl 
jnz ill_ip 
jmp DCrLf 
ill_trap endp 
code ends 


include pwrup3.asm 


PSS SSS SS SSS SSS SSS SS SSS SSS SSSSSSSSSSSSSSSSSSSSSS SSS SSS SSS SSS SSSSTSSSssse 
. Filename: pwrup3.src 
; 
;: This module includes 8041 keyboard, communication LSI, RAM, and 
. optional ROM tests. 
’ 
pS SSSSSS SSS SSS SS SSS SSS SSSSSSSSSSSSSSSSSSSS SS SSS SSS SSS SS SSS SSS SSS TSSSSESE 
code segment public 'ROM' 
assume cs:code, ds:nothing, es:data, ss:nothing 
> Kee Re ee eee eee eee eee wee Me ee Eee OE OE EEE 
; Input: ds = segment of ROM under test 
; es = firmware data segment 
H 
; Trash All other registers except bx destroyed (in general). 
; 


rom_err proc near 
assume cs:code, ds:nothing, es:data, ss:nothing 
mov ax,ds 
mov byte ptr es:(mfg_err_flag],ah ; high byte of ROM address 
mov si,ces:(offset fail_m) ; indicate ROM failed 
eall DRomString 
jmp DCrLf 
rom_err endp 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
; meee wee ee ee eB ee Oe EE Oe OE EE EOE EEE EE EB EB EO Ew EB Eee eee EEE EE Ee Ee Ee Ee eee 
P Input: ds:si = pointer to ROM to be tested 
’ 
; Output: ah = checksum for the ROM 
; ex = 0 
; si = pointer to byte past ROM 
: zf = state of checksum for the ROM 
, 
F Trash al destroyed. 


near 
es:code, 


rom_checksum proc 


assume ds:nothing, es:nothing, ss:nothing 
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E5 E5 


E5 E8 
E5 E8 


E5EA 
E5EA 
E5 EB 
E5 ED 


E5SEF 
E5F1 


E5F2 


E5F2 


E5F2 


E5F2 


2000 


EO 
FB 


0040 


2E: 
C3 


8E 1E E5F2 R 


E602 R 


PFPEOEAMQVAAAIAAAAAAAAAAAAAAAARAANAAAAANAAAANAAARAAAANANRAAANAAAARAAANAANRAAAANRAARARAAAAAAAAAAAAAAAARAAAAAAAA AAA AAaAAAAAaaAa 


mov ex,2000h 


rom_checksum_cnt: 
xor ax, ax ; clear ah 


rom_checksum_loop: 


lodsb ; 12 al gets ds:si 
add ah,al 4H 3 
loop rom_checksum_loop 3; 17 
or ah,ah 
ret 
rom_checksum endp 
code ends 


include pwrup4.asm 


Filename: pwrup4.sre 


, 
; 
; This module includes disk drive tests, system initialization, 
; keyboard boot-strap options, and message routines. 

’ 


code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


Utility Routines: 


’ 
’ 
; DRomString DString DCrLf DColon 
; DHexLong DHexWord DHexByte DHexNib 
; DNunm DNunW 
pESS SSS SSS SSS SSS SSS SSS SSS SSS SSS SS SSS SSS SSSSSSSSSSSSSSS SSS SSS SSS SS SSTSss 
p4_data1 proc near 
even 
set_ds_word dw data_seg ; 2 bytes = 0 clocks 
p4_datal endp 
set_ds proc near ; set ds to firmware data segment 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
mov ds,word ptr cs:[set_ds_word] ; 5 bytes 2+9+6 = 17 clocks 
ret ; 1 byte = 8 clocks 
ee 
set_ds endp 
PSS SSSSSSSSS SS SS SSS SSSSSSSSSsssssssssssssssssssessesssssssesssesssseses 
; Display ASCII String Utilities 
pT SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS SSS SSS sessssesssssssssrssssseze 
DRomString proc near ; Displays NUL terminated string at cs:si 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
push ds 3 all registers saved 
push cs ; ds gets cs 
pop ds 
call DString 
pop ds ; restore ds 
ret 
DRomString endp 
DString proc near ; Displays NUL terminated string at ds:si 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
push ax ; all registers & flags saved 
push bx 
push si 
pushf 
eld ; auto increment 
mov bl,1 ; select foreground color for grafix modes 
DS_lp: lodsb ; al gets ds:si and si++ 
or al,al ; NUL ? 
je DS_ret 
mov ah,OEh ; tty emulator 
INT 10h 
jmp short DS_lp 
DS_ret: 
popf ; restore registers & flags 
pop si 
pop bx 
pop ax 
ret 
DString endp 
DCrLf proc near ; Displays a CR & LF. 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
push ax ; all registers preserved 
mov ax, (OEh#100h)+CR 
INT 10h ; tty emulator 
mov ax, (OEh#100h)+LF 
INT 10h ; tty emulator 
pop ax > restore ax 
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E625 C3 c ret 
E626 Cc DCrLf endp 
c 
E626 C DColon proc near ; Displays a ':', 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
E626 50 Cc push ax ; all registers preserved 
E627 53 Cc push bx 
E628 B3 01 c mov bl,1 ; select foreground color for grafix modes 
E62A B8 OE3A Cc mov ax, (OEh*100h)+' 
E62D CD 10 c INT 10h ; tty emulator 
E62F 5B Cc pop bx ; restore registers 
E630 58 Cc pop ax 
E631 C3 C ret 
£632 C DColon endp 
Cc 
(04 pESSSSSSSSssssssssssssse SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSQSSSssessessesesesse 
Cc Display Hexadecimal Number in ASCII Utilities 
ce PSSSSSSS SSS SSS SS SSS SSS SSS SSS SSS SS SS SSS SSS SS SSS SSSS SSS SS SSS SS SSS SESSSSEE 
c 
E632 C DHexLong proc near ; Displays ds:ax in ASCII 
C assume ocs:code, ds:nothing, es:nothing, ss:nothing 
E632 50 Cc push ax ; all registers preserved 
£633 8C D8 Cc mov ax,ds ; display segment first 
E635 E8 E63C R c eall DHexWord 
c 
E638 E8 E626 R c eall DColon ; display a colon 
c 
E63B 58 c pop ax ; restore ax 
G 4 jmp short DHexWord ; fall through: display offset second 
c 
E63C C DHexLong endp 
Cc 
E63C C DHexWord proc near ; Displays ax in ASCII 
(¢} assume cs:code, ds:nothing, es:nothing, ss:nothing 
E63C 50 c push ax ; all registers preserved 
E63D 8A C4 Cc mov al,ah 
E63F E8 E643 R c eall DHexByte ; display high byte first 
E642 58 c pop ax ; restore ax 
CY jmp short DHexByte ; fall through: display low byte second 
Cc 
E643 C DHexWord endp 
c 
E643 C DHexByte proc near ; Displays al in ASCII 
c assume cs:code, ds:nothing, es:nothing, ss:nothing 
E643 50 c push ax ; all registers preserved 
E644 DO c8& c ror al,1 
E646 DO C8 c ror al,1 
E648 DO C8 c ror al,1 
E64A DO C8 c ror al,1 ; move high nibble to low nibble 
E64C §E8 E650 R Cc call DHexNib ; display high nibble in ASCII 
E64F 58 c pop ax ; restore ax 
Cc 4 jmp short DHexNib ; fall through: display low nibble in ASCII 
c 
E650 C DHexByte endp 
c 
E650 C DHexNib proc near ; Displays low nibble of al in ASCII 
c assume cs:code, ds:nothing, es:nothing, ss:nothing 
E650 50 Cc push ax ; all registers preserved 
E651 53 c push bx 
£652 B3 01 c mov bl,1 ; select foreground color for grafix modes 
E654 24 OF c and al,Ofh ; clear high nibble 
E656 0&8 30 c add al,'o' 
E658 3C 39 c emp 2, Not 
E65A 76 02 c jbe NibOk s 'O* <# al <x '9* ? 
E65C 04 07 c add al,'At-'0'-10 
E65E B4 OE C NibOk: mov ah,OEh ; tty emulator 
E660 CD 10 c INT 10h 
E662 5B Cc pop bx ; restore registers 
£663 58 c pop ax 
E664 C3 c ret 
E665 C DHexNib endp 
Cc 
Cc pS SSS SSS SSS SS SS SSS KSSH SS SSSSSSSSsSSsssssssssssessesssesssssseesszsseeee 
Cc 3 Display Decimal Number in ASCII Utilities 
C PSS SSSSSSSSSSSTSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSEE 
c 
E665 Cc DNum proc near ; Displays decimal of ax in ASCII in min width 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
£665 53 Cc push bx ; all registers preserved 
E666 33 DB c xor bx, bx ; minimum width 
E668 E8 E66D R Cc call DNumW ; display ax 
E66B 5B (es pop bx ; restore bx 
E66C C3 c ret 
E66D C DNunm endp 
Cc 
E66D Cc DNumW proc near ; Displays decimal of ax in ASCII of width bx 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
c 
E66D 50 c push ax ; all registers preserved 
E66E 53 Cc push bx 
E66F 51 Cc push ex 
E670 52 c push dx 
E671 56 Cc push si 
c 
E672 BE OOOA c mov si,10 ; decimal modulus 
E675 33 C9 c xor ex, cx j; Clear digit counter 
E677 C DNumW_loop: 
E677 33 D2 c xor dx, dx 3; dx:ax = decimal number 
E679 FT F6 C div si ; dh = 0 
c ; dl = remainder = (0-9) 
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E69E 


E6F2 
E6F2 
E6F2 
E6F5 
E6F5 


E6F5 


0080 
0020 
0008 
0004 
0002 
0001 


= 0020 
= 0010 


0002 
0001 


0004 
0001 


E9 F860 R 


AAQAARAAAARAARAAAARARARARANANAAANAANAMAAAAAaGAaAAA 


PAAWQAAPAAMWAGAAAAAGRAAAAAAAAAAAQAAAVAAAARAAANANAAAAAAAAAAOAAAAAAAAAAAAOAGAG 


push 
ine 
or 
jnz 


sub 
jbe 


DNumW_spaces: 
mov 
INT 
dec 
jnz 


DNumW_skip: 


dx 

ex 

ax,ax 
DNumW_loop 


bx, cx 
DNumW_skip 


ax, (OEh#100h)+' ' 
10h 

bx 

DNumW_spaces 


we ee ee we 


ax = quotient = higher order digits 
save the digit on stack 

increment count of what's on stack 
are we done? 


subtract digit count from width 
skip spaces if bx is not > ex 
display a space 


decrement count of spaces 
keep going 


mov b1,1 ; foreground color for grafix modes 
pop ax ; remove digit from stack 
add al, 10 > convert to ASCII 

mov ah,OEh ; display the digit 

INT 10h 

loop DNumW_skip 

pop si ; restore registers 

pop dx 

pop ex 

pop bx 

pop ax 

ret 


DN umW endp 
code ends 


include booti.asm 


; Filename: booti.sre 
; This module includes the ORG'd jump to INT 19h (boot2.src) 
code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
ORG OE6F2h 
bt_jmp proc near 
jmp bt_int ; necessary jump for ORG 


bt_jmp endp 


code ends 
include com1.asm 


; Filename: comi.sre 
H 
; This module, com2, and com3 supply INT 14h. 
; 
pSSSSS SSS SS Ses sss sss esse esse ssssessessessssesssessesesesessseseeeeeeee: 
code segment public 'ROM! 

assume cs:code, ds:nothing, es:nothing, ss:nothing 
; SASS SS SSM SS SSMS S Sn SS SS RK Ean Seen mnnomenncoonace 
; INS8250 Compatible Line Status Bits (ah) for Z8530 SCC Re-Mapping 
, rere re nee en Pee TPF Pee ee Pe em em Be eee ee Fee meme wee wew eee mentee e emma ee eee ewas 
com_te equ 80h ; time out error (bit #7) 
com_txd equ 20h ; transmit ready (bit #5) 
com_fe equ 08h ; framing error (bit #3) 
com_pe equ O4h ; parity error (bit #2) 
com_oe equ 02h ; overrun error (bit #1) 
com _rxd equ O1h ; receive ready (bit #0) 


com_dsr equ 20h ; data set ready (bit #5) 
com_cts equ 10h ; clear to send (bit #4) 

H oewrnr errr ern ene etree ewe mem ee ew mem mmm mm em ee we eww mew ee wee ee ewe em wm wow eee ew eee oe oe 

; INS8250 Compatible Modem Control Bits. 

H er we wwe er ee BP Oe BO we Oe Oe Oe we ee ew eM eM em wm we we Oe em we we we mee ee eww em em em em em me wee eee ee 
com_rts equ 02h ; request to send (bit #1) 
com_dtr equ O1h ; data terminal ready (bit #0) 
; ecw were ew we eee ee ee fee eee eee eee ew wee eee wm mee mmm mmm mmm mee eee eee ee eee ew eee ee 

; 28530 SCC Status Register (Read Register #0) 

; -————— OR Ewe Re ee BO Be me me ee ee ee ee ew ee ee ee ee ee eee ee ee 
scc_txd equ O4h ; transmit ready (bit #2) 
scec_rxd equ Oth ; receive ready (bit #0) 


; 28530 SCC Error Register (Read Register #1) 
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Cr rence sssece 
c 
= 0040 C scc_fe equ 40h ; framing error (bit #6) 
= 0020 C sec_oe equ 20h ; overrun error (bit #5) 
= 0010 C scc_pe equ 10h ; parity error (bit #4) 
c 
Cf rr rr ne nnn nnn eee nnsnas 
Cc 3 INS8250 Asynchronous Communication Chip Baud Rate Time Constants 
Cc ; (baud rate generator signal is 3.6864 MHz put through a 
Cc 3 divide-by-2 circuit. 
Cc . 
Cc : ((3,686,400 Hz)/2) = Input Freq. 
G 3 Time Constant = ---<-------n nnn w nnn nner nen nner - 
Cc (16)*#(baud rate) 
Cf nn rn nn nn nnn nnn nnn nen nee nnn nn een neaaa= 
c 
E729 c ORG OF729h 
c 
E729 C com_datai proc 
c 
E729 04817 C com_baud dw 1047 ; 110 baud (0) 
E72B 0300 c dw 768 ; 150 baud (1) 
E72D 0180 c dw 384 ; 300 baud (2) 
E72F 00CO c dw 192 ; 600 baud (3) 
E731 0060 c dw 96 ; 1200 baud (4) 
E733 0030 c dw 48 ; 2400 baud (5) 
E735 0018 c dw 24 ; 4800 baud (6) 
E737 000C c dw 12 3 9600 baud CT) 
Cc list 
c 
E739 C com_datai endp 
c 
Cf enn nee een ene e nnn nnnanan 
c ; 28530 Serial Communication Controller Baud Rate Time Constants 
c 3 (baud rate generator signal is 3.6864 MHz) 
Gc 4 (NO divide-by-2 ocircuitl!!!) 
c 5 
Cc 4 (3,686,400 Hz) = Input Freq. 
c (3 Time Constant = -<<--<-<-----2 enn nnn nnn nn - 2 
Cc ; (16)#(2)#(baud rate) 
Cc 3 
Gf NOTE: These values are the SAME as the above EXCEPT for the - 2!!!1 
Cf ee en en eee ee eene= 
c 5 
C ;sce_baud dw 1045 ; 110 baud (0) 
Cc ; dw 766 H 150 baud (1) 
Cc (3; dw 382 ; 300 baud (2) 
c ¢ dw 190 ; 600 baud (3) 
Cc ; dw 94 ; 1200 baud (4) 
C-4 dw 46 3; 2400 baud (5) 
Cc; dw 22 ; 4800 baud (6) 
Cc 3 dw 10 3; 9600 baud CT) 
Cc list 
c 
C PE SSS SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSsssssssssssssesssssessze 
Cc 3 INT 14h -- RS-232 Software Interrupt Request Routine 
Cc 3 
Cc (3; Assumes: INS8250 port addresses are > 256. That is, the 
Cc (3 high byte of the port address is nonzero, if and 
Cc 3 only if, the port is a INS8250. (e.g. com_a ports 
G *% are 03F8h - O3FFh & com_b ports are O2F8h - O2FFh.) 
Cc 3 
Cc 3 Similarly: Z8530 port addresses are < 256. That is, the 
c 3 high byte of the port address is zero, if and 
Cc § only if, the port is a 28530. (e.g. secc_a ports 
c¢ 3 are 0050h - 0051h & sec_b ports are 0052h - 0053h.) 
Cc 3 
Cc 3 Z8530 Note: For the reset during power-up, DTR and RTS must be 
Cc 4 set low which is the only difference from a normal 
Cc ; reset (AH=0). This is accomplished by a special 
c is function code (AH=OFFh). 
C pS SS SS SS SSSSSS SSS SS SSS SSS SSS SS SSS SSS SS SSSSSSSsSssssssssrsssssssssszsssee 
c 
E739 c ORG OE739h 
c 
E739 C serial_io proc near 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
E739 FB Cc sti ; enable interrupts 
C 
E73A 55 Cc push bp ; save register 
Cc 
E73B 83 FA 04 Cc emp dx,4 ; 4 RS-232 channels allowed max 
E73E 73 3D Cc jae rs_nop 
c 
E740 8B E8 Cc mov bp, ax ; save original function code 
E742 80 FC FF c emp ah,OFFh ; power-up reset? 
E745 75 02 c jne rs_nornm ; jump if no 
E747 32 E4 c xor ah,ah ; Same as reset, BP remembers FF 
Cc 
E749 C rs_norm: 
E749 80 FC 03 Cc emp ah,O03h ; input out of range? 
E7T4C 77 2F c ja rs_nop 
Cc 
Cc assume cs:code, ds:data, es:nothing, ss:nothing 
Cc 
ET4E 52 c push dx ; save registers 
ET4F 51 c push ex 
E750 53 Cc push bx 
E751 1E c push ds ; save ds 
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SS SSS 


ET7TF 
E781 
E783 
E785 
E787 
E789 
E78B 
E78D 


E78F 


2E: 8E 1E E5F2 R 


8B DA 
33 C9 
8A 8F 
D1 E3 
8B 97 


OO7C R 


0000 R 


OB D2 
T4 10 


OA F6 
75 03 


80 Ch O4 


8A DC 
D1 £E3 
2E: FF 97 ET7F R 


5B 
59 
5A 


5D 
CF 


E78F 
E8EC 
E92A 
E87F 
F573 
E91B 
E9 4D 
E88A 


DUD wa Dw wy 


52 
8A E8 
BO 80 


83 C2 03 


2E: 8B 87 E729 R 
5A 

EE 

E8 E8E2 R 


8A Ch 

42 

EE 

E8 E8E2 R 


8A C5 


mov ds,word ptr ecs:[set_ds_word] ; satisfy assumptions 
mov bx, dx ; wet port number (0-3) 
xor ex, cx ; Clear ch 
mov cl,byte ptr ds:[bx+serial_t_out] 3 get RS-232 time-out 
shl bx,.1 ; make word index 
mov dx,word ptr ds:(bx+rs232_addr] ; get address of RS-232 
; data port 
pop ds ; restore ds 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
or dx, dx ; RS-232 port present? 
jz rs_ret ; if not, leave 
or dh, dh ; are we a INS8250 chip? 
jnz rs_ok ; if so, take jump 
add ah,4 ; if SCC Z8530 and 4 to function 
rs_ok: 
mov bl,ah ; bx = function number 
shl bx,1 ; bx = 2*(function number) 
call es:[bx+(offset rs_tbl) ] > perform rs232 function 
rs_ret;: 
pop bx ; restore registers 
pop ex 
pop dx 
rs_nop: 
pop bp 
iret 
; ~~ wen em me Re em me ew me we ee em ee ee ee eee ew ee eee Be ee ew ee ee ew ee ee wee eee eee ee ee ee ee ee 
; INT 14h Jump Table 
; ellie 
rs_tbl dw com_init ; ah = OOh for INS8250 
dw com_pb ; ah = O1h for INS8250 
dw com_gb ; ah = O2h for INS8250 
dw com_stat ; ah = 03h for INS8250 
dw sec_init ; ah = 00h for SCC 28530 
dw sec_pb ; ah = Oth for SCC 28530 
dw sco_gb ; ah = 02h for SCC Z8530 
dw scc_stat ; ah = 03h for SCC 28530 
serial_io endp 
; ie eee 
; Initialize RS-232 Interface. 
, 
; Input: al = input parameters 
; dx = address of RS-232 channel 
; Output: ax = RS-232 channel status 
, 
: al initializes port with: bit #76543210 
; tote tet te tet tat 
; IBIBIBJP|PISID{D] 
H te tet tate te tetas 
; Baud (BBB): Parity (PP): Stop Bits (S): Data Bits (DD): 
; 0 = 110 4 = 1200 x0 = None 021 10 = 7 
; 1 = 150 5 = 2400 01 = Odd 1 = 2 11 = 8 
' 2 = 300 6 = 4800 11 = Even (00 = 5?) 
; 3 = 600 7 = 9600 (01 = 67) 
; 
: Assumes com_int_x = com_data_x + 1 = dx + 14 
; com_letl_x = com_data_x + 3 = dx + 3 
; — 222 2 RSS aE ROMS SSS See Bee meena eseeusnaseneonasaeneameoasun 
com_init proc near > ab = 00h 
assumé cs:code, ds:nothing, es:nothing, ss:nothing 
push dx 3; Save dx = com_data_x 
mov ch,al ; Save input parameters. 
mov al,080h ; access divisor latch of 
3 baud count register. 
add dx, 3 ; Gx = com_letl_x 
out dx,al ; write to line control register 
eall rs_dly 
mov bl,ch ; get input parameters, 
and bx,11100000b ; get bits #5, 6, & 7 (clear bh) 
mov ecl,4 
shr bl,ecl ; move to bits #1,2,& 3 
; bx is word index 
mov ax,word ptr cs:[bx+com_baud] ; get 8250 baud count 
pop dx ; restore dx = com_data_x 
out dx, al ; output low byte of baud rate 
call rs_dly 
mov al,ah ; transfer high byte to low byte 
ine dx ; dx = com_int_x 
out dx, al ; Output high byte of baud rate 
eall rs_dly 
mov al,ch ; get input parameters. 


—_—_—_—eeeeSeSeSSSSSSSeeeeeeeeSFSFSFsFeFsFFFFeFsFsSsSshseses 
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E7B8 24 1F c and al,00011111b ; get bits #0 thru #4 
E7BA 42 Cc inc dx 
E7BB 42 c ine dx ; dx = com_lectl_x 
E7BC EE c out dx,al ; write to line control register 
E7BD E8 E8E2 R c call rs_dly ; disable access divisor latch, 
Cc ; set data & stop bits, & parity 
Cc 
E7CO 32 CO Cc xor al,al ; disable all interrupts!! 
E7C2 4A Cc dec dx 
E7C3 4A c dec dx ; dx = com_int_x 
E7C4 EE ( out dx, al ; write to interrupt ID register 
Cc 
E7C5 4A c dec dx ; dx = com_data_x 
E7C6 EQ E87F R c jmp com_stat ; return status 
Cc 
E7C9 C com_init endp 
Cc 
E7C9 C code ends 
C include kb1.asm 
c 
(of p eeeecccersrrecresssssrSsrsS SSeS ser sresssTSSSSSSSSSTSesSSSSSSeSasSeses 
Cc 3 Filename: kbi.sre 
Cc 3 
Cc }3 This module includes INT 09h & 16h. 
C . 
(¢} jeececcecccesecscsesccresessessssesrrresrsssrrsssessersesssessssesssses 
Cc 
E7C9 C code segment public 'ROM' 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
e seme rcesseaeresesrsSS SSE SSS SsSsSSS SSS TSS TSS SSS SSS SSSSESSSTSSSSSRRS ESS 
Cc 3 INT 16h -- 18041A Keyboard Software Interrupt Request Routine 
Cc s SES SEEESE EES EES SSE S SSS TET ESS STSSSSSSSSSSSSSSSSSSSSSSSSSESSSSESSSSSESSS 
[¢4 . 
c ; Input: ah = function number (00h <= ah <= 03h) 
CG. 4% Output: ah = (ah - 2) if ah >= 2 
c 3 
c 4 Trash: None. (bx & ds if ROM stack) 
Cc 
Cc 3 Note: The stack never gets deeper than 6 words!!! 
Cc 3 
Cc 3 High Address 
c 3 | ------- eee ee een | <-- sp (at entry & exit) 
Cc 3 | return fsaw flags | 
Cc 3 | en ene nen nnn nn nnn-- | 
Cc 3 | return cs segment} 
Cc ; | ------------------ 
G y | return ip offset | 
c -% | ---------------- = | <-- sp after kb trap 
Gc +; | ds | 
Cc | ennen enn nn nnn n--- | 
CG is | bx | 
Cc 3 | --e-e enn e nn nn------ | 
C 3 | 1 near call H 
c 3 | ------ eee een nnn | <-- sp (at its deepest!!) 
Cc 3 Low Address 
Cc 3 
Cc perce eecereseSS SEES SSS ST SSS ST SS SSS SSS SSSSST SSS SSSR SSSSS TSS SSS TS EESESSES 
Cc 
E82E Cc ORG OE82Eh 
c 
E82E C k_io proc near 
c assume cs:code, ds:nothing, es:nothing, ss:nothing 
c 
E82E_ FB Cc sti ; enable interrupts!! 
E82F 1E c push ds ; save ds 
E830 2E: 8E 1E E5F2 R c mov ds,word ptr cs:[set_ds_word] ; avoid potential stack problems 
E835 53 Cc push bx ; save bx 
Cc 
Cc assume cs:code, ds:data, es:nothing, ss:nothing 
Cc 
E836 80 FC 01 c omp ah,1 ; ah <= 1? 
E839 72 OA c jb k_read ; jump if ah = 0 
E83B 74 23 C je k_1look ; jump if ah = 1 
E83D 80 FC 02 c emp ah,2 3; ah=2 2? 
E840 74 27 Cc je k_stat 
c 
E842 5B C k_ret: pop bx ; restore registers 
E843 IF c pop ds 
E844 CF c iret 
c 
E845 C k_io endp 
Cc 
Co fewer cme e mene ee cnr e nme e nen memes ewe mer mee Re ee eee ween 
Cc 3; Wait for key and extract if from the keyboard buffer. 
c 5 
Cc 3 Output: ah = raw scan code 
Cc 3 al = ASCII translated key 
Cc H or 
Cc 3 ah = translated key 
c ; al = 00h 
Cc 3 
Cc 3 Trash: None 
Cc J rrr rrr rr rr msn n nr nnn ee es - 
c 
E845 C k_read proc near 
c assume cs:code, ds:data, es:nothing, ss:nothing 
c 
E845 FB Cc sti ; enable interrupts (again) 
E846 E8 E854 R c eall k_see ; is there a character present? 


i 
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Cc ; interrupts come back disabled! 
E849 74 FA Cc 3% k_read ; loop until something in buffer 
E84B E8 E86E R C call k_adv_ptr ; move pointer to next position 
E84E 89 1E OO1A R c mov word ptr ds:[(buffer_head], bx ; store value in variable 
E852 EB EE (¢3 jmp short k_ret 
Cc 
Cc 
E854 FA C k_see: cli ; disable interrupts!! 
E855 8B 1E OO1A R Cc mov bx,word ptr ds:[buffer_head] ; get pointer to head of buffer 
E859 3B 1E OO1C R Cc cmp bx,word ptr ds:[buffer_tail] ; if equal, then nothing there 
E85D 8B 07 c mov ax,word ptr ds:[bx] ; get scan code and ascii code 
E85F C3 c ret 
Cc 
E860 C k_read endp 
c 
Co fmm mre nn nn ere nn nn eee enn nn ee ee ee eee eee eee 
C- 5 Checks for key in keyboard buffer, but does not extract it. 
Cc 
Cc }; Output: if key is in buffer, then: 
Cc 3 zf = 0 (nz = reset) 
C- 3 ah = raw scan code 
Cc; al = ASCII translated key 
Cc or 
Cc 3}; ah = translated key 
Cc 3 al = 00h 
Cc 3 else; 
Cc ; zf=i1 (z= set) 
Cc 3 ax = 16th previous key 
Cc; 
Cc ; Trash: ax is trashed if keyboard buffer is empty. 
Co pre ern een ne en ne ee ee ee ee ee ee ee ee eee eee 
Cc 
E860 C k_look proc far ; must be fart!!! 
c assume cs:code, ds:data, es:nothing, ss:nothing 
Cc 
E860 E8 E854 R Cc call k_see ; is there a character present? 
C ; interrupts come back disabled! 
E863 FB c sti ; must return interrupts enabled 
E864 5B c pop bx ; restore registers 
E865 1F Cc pop ds ; blow away flags returning: 
E866 CA 0002 Cc ret 2 ; zf & ax = k_see output, & sti 
c 
E869 C k_look endp 
f ] c 
C jew eee nnn nn nn ---- ee ee ee ee eee eee 
Cr -8 Returns keyboard shift state kb_flag in al 
c 3 
Cc 3 Output: ah = 0. 
Cc 3; al = kb_flag 
Cc . Trash: None 
CC pew r nnn ce nn eee ene ee ee ee eee eee 
C 
E869 C k_stat proc near 
Cc assume cs:code, ds:data, es:nothing, ss:nothing 
C 
E869 AO 0017 R c mov al,byte ptr ds:[kb_flag] ; get the shift status flags 
E86C EB D4 Cc jmp short k_ret 
Cc 
E86E C k_stat endp 
C 
Co free renee nnn nnn eee ne ee ee ee eee eee 
Cc  § Advances kb_buffer ring buffer pointer. 
Cc 3 
Cc . Input bx 
Cc CC; Output: bx 
c Trash: None 
Co pre en nnn nee ee ne eee eee ee eee ene 
C 
E86E C k_adv_ptr proc near 
Cc assume csicode, ds:data, es:nothing, ss:nothing 
€ 
E86E 43 Cc ine bx ; move to next word in list 
E86F 43 Cc ine bx 
E870 3B 1E 0082 R c emp bx,word ptr ds:[buffer_end] > end of buffer ? 
E874 75 04 Cc jne k_adv_end ; no, continue 
E876 8B 1E 0080 R c mov bx,word ptr ds:[buffer_start] ; yes, buffer to beginning 
E87A C k_adv_end: 
E87A C3 Cc ret 
Cc 
E87B C k_adv_ptr endp 
Cc 
E87B C code ends 
C include com2.asm 
C 
le} pSSSSSSSSssssssssststesssssssssesseesssssssssessseseeeesseseseeeeeeeeee 
c . Filename: com2.src 
Cc 
C pRS TSS SS SSS Sssssessssessssssssseeesssssssseeessesessesseeseeeeeereeeeete 
Cc 
E87B C code segment public 'ROM! 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
C Fe et mn we ee eee mw ee neem w eee nee 
c 3 Read Status of RS-232 Interface. (rs_stat) 
Cc 3 
¢ Input: dx = if dh = 0, then address of 28530 channel (scec_ctl_x). 
C 3 if dh <> 0, then address of 8250 data port (com_data_x). 
C ; Output: ax = RS-232 (INS8250-compatible) channel status. 
Cc; 


Trash: None, 


ROM BIOS 
Listing 


: Assumes: com_lstat_x = com_data_x + 5 = dx + 5 (line status) 
: com_mstat_x = com_data_x + 6 = dx + 6 (modem status) 
; ATS aAAASSOSAAA SSK ASSN Se SSS a eae Keene eamSis eee assess se3 === 
E87B rs_stat proc near > ah = 03h 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
E87B OA F6 or dh, dh ; are we a SCC 28530 chip? 
E87D 74 OB jz sec_stat ; if so, take jump 
E87F com_stat: ; INS8250 read status routine. 
; Get Line Status. 
E87F 52 push dx ; save dx = com_data_x 
E880 83 C2 05 add dx,5 ; dx = com_lstat_x 
E883 EC in al,dx ; get line status 
E884 8A EO mov ah, al ; line status comes back in high byte 
; Get Modem Status. 
E886 42 ine dx ; dx = com_mstat_x 
E887 EC in al,dx ; get modem status in low byte 
E888 5A pop dx ; restore dx = com_data_x 
E889 C3 ret 
E88a scc_stat: ; SCC 28530 read status routine. 
; Get Channel Status. 
E88A 33 CO xor ax, ax ; al = selects 0 ; ah = no errors 
E88C EE out dx, al 3 dx = sec_ctl_x 
E88D E8 E8E2 R eall rs_dly 
E890 EC in al,dx ; get channel status 
E891 A8& 04 test al,scc_txd ; test for transmit ready 
E893 74 03 jz sec_no_txd 
E895 80 CC 20 or ah, com_txd ; if so, set INS8250-compatible bit. 


E898 scec_no_txd: 

E898 a8 01 test al, scc_rxd ; test for receive ready 

E89A 74 03 jz sec_no_rxd 

E89C 80 CC 01 or ah, com_rxd ; if so, set INS8250-compatible bit. 


E89F scec_no_rxd: 
; Get Error Status. 
E89F BO 01 mov al,1 ; get errors 
E8A1 EE out dx,al ; dx = sec_ctl_x 
E8A2 E8 E8E2 R call rs_dly 
E8A5 EC in al,dx ; get error status 
E8A6 A8& 40 test al,scc_fe 3; test for framing error 
E8a8 74 03 jz sec_no_fe 
E8AA 80 CC 08 or ah, com_fe ; if so, set INS8250-compatible bit. 
E8AD scc_no_fe: 
E8AD A8 10 test al,scc_pe ; test for parity error 
E8AF 74 03 jz scc_no_pe 
E8B1 80 CC 04 or ah, com_pe ; if so, set INS8250-compatible bit. 


E8 BY scc_no_pe: 
E8B4 A8& 20 test al,scc_oe ; test for overrun error 
E8B6 74 03 jz scc_no_oe 
E8B8 80 CC 02 or ah, com_oe ; if so, set INS8250-compatible bit. 
E8BB scc_no_oe: 
; Set Modem Status. 
E8BB BO 30 mov al, (com_dsr+com_cts) ; al = DSR and CTS 
E8BD C3 ret 
E8BE rs_stat endp 


Wait for Status of RS-232 Interface. (rs_ws) 


Input: ah = RS-232 channel status for which to wait 
ex = RS-232 time-out 
dx = if dh = 0, then address of 28530 channel (scc_ctl_x). 
if dh <> 0, then address of 8250 data port to poll. 
Output: AH = Status. 
ZF = set, if status matches. 


reset, if time-out. 
Trash: al & bx destroyed. 
Assumes: com_lstat_x com_data_x + 5 dx + 5 (line status) 


com_mstat_x = com_data_x + 6 = dx + 6 (modem status) 


we ww mm ee wm we ew em we em ew ee ee ee me we ee ee eee Re ee em ee ee ee ee eee meee rere rer ere eee 


mee ee ee ee ee wee ee ee wee ee ee ee ee ee ee 


ANMAAANAA AMA AAADAAANAQAQ QA ANMAANDAANAANQAANQAANANNAAMAANNM ANNA AN ANAM ANANMAANANANNAANANAAMAAMANANNANANAANNANNAANAANAANAANANAaAAANNMAAANANAAANNA 
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E8EC 


E8EC 
E8ED 


E8EE 
E8FO 
E8F 3 


E8F4 
E8F6 
E8F7 
E8F8 
E8 FB 


E8FD 
E8FF 
E900 
E903 


E905 
E906 
E908 
E90B 
E90D 
E90E 


DB 
CB 


0008 
FE 


C2 04 


QDAAAAAAAAAAAIGDADAIIAAGAAAAAAAAAPVAVAMAAAAAAAANAAANRAARANAAAAAARAAAAAAAAMDAAAAAAAAARAAAANRAAAAAAAAAAAAAAAAAAGA 


ROM BIOS 
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rs_ws proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


push ex ; save time-out 

xor bx, bx ; Clear bx 

xchg cx, bx ; BL now has rs232_time_out. 
rs_ws_lp: 

or dh, dh ; are we an INS8250 chip? 

jnz rs_ws_com ; if so, take jump 

xor al,al ; al = selects 0 on SCC 28530 

out dx, al 3; dx = see_ctlx 

eall rs_dly 


rs_ws_com: 


in al,dx ; get channel status 

mov bh, al ; save status in BH. 

and al,ah ; mask bits we're waiting for 

cmp al,ah ; are they all on? 

jz rs_ws_exit ; if so, exit with zf set 

loop rs_ws_lp ; inner loop 

dec bl 

jnz rs_ws_lp ; outer loop 

or ah,ah ; time-out, exit with zf reset 
rs_ws_exit: 

mOV ah, bh ; move status to AH. 

pop ex ; restore time-out 

ret 


rs_ws endp 


rs_dly proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


pushf 

push ex 

mov ex,8 
rs_lp: loop rs_lp 

pop ex 

popf 

ret 


rs_dly endp 


assume cs:code, ds:nothing, es:nothing, ss:nothing 


INS8250 Put Byte (com_pb) & SCC 28530 Put Byte (sec_pb) 


’ 

’ 

3 Transmit Character to RS-232 Interface. 

, 

; Input: al = character to transmit 

; cx = RS-232 time-out 

; dx = if dh = 0, then address of 28530 channel (scc_ctl_x). 
; if dh <> 0, then address of 8250 data port (com_data_x). 
‘ Output: ah = line status 

; Trash: bx destroyed. 

’ 

‘ Assumes: com_mctl_x = com_data_x + 4 = dx + 4 

; com_lstat_x = com_data_x + 5 = dx + 5 

H com_mstat_x = com_data_x + 6 = dx + 6 

, 

; sec_data_x = scec_ctl_x + 1 = dx + 1 


com_pb proc near ; ah = Oth 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


push dx 3; Save dx = com_data_x 

push ax ; save character to output in al 
mov al, (com_rts+com_dtr) ; Signal RTS & DTR 

add dx,4 ; dx = com_mctl_x 

out dx, al ; send to modem control register 
mov ah, (com_dsr+com_cts) ; wait for DSR & CTS 

ine dx 

ine dx 3 dx = com_mstat_x 

call rs_ws ; wait for modem status register 
jnz rs_pbe ; if time-out, take jump 

mov ah,com_txd ; wait for transmit ready 

dec dx ; ax = com_lstat_x 

call rs_ws ; wait for line status register 

jnz rs_pbe ; if time-out, take jump 

pop ax restore character to output in al 
mov bl,al save character input/output in bl 


’ 
’ 
call rs_stat ; get return status 

mov al, bl ; restore character input/output in al 
pop dx ; restore dx = com_data_x 

out dx,al ; else, output the character 


; exit for put and get byte 
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E9OF 
E9OF 


E910 
E910 
E911 


E912 
E915 
E917 
EQIA 


E91B 


E91B 


E91B 
E91C 


E9iD 
EQIF 
E922 


E924 
E925 
E926 


E927 
E928 


E92A 


E92A 


EQ2A 
E92B 
E92D 
E930 


E931 
E933 
E934 
E935 
E938 


E93A 
E93C 
E93D 
E940 


E942 
E945 


E946 
E947 


E948 
E948 


E949 
E94C 


E94D 


E94D 


EQ4D 
EQ4E 
E950 
E953 


E955 


C3 


5B 
5A 


E8 
8A 
80 
C3 


80 
C3 


52 
B4 
E8 
75 


42 
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E87B R 
C3 
cc 80 


04 
E8BE R 
EC 


E5 


01 
c2 04 


20 
E8BE R 
OE 


01 


E8BE R 
06 


E4 OE 


cc 80 


01 
E8BE R 
F3 


AAARAANDANAAARAAADAMAARANKD ANAM MDMAA ADANAANAANDAAANRANRAAARAARAANAN ANN AARANAANANDNQAANRAANAAANAANANAANANAANNAAANNANANANAMAAANANANANAANNNGAMAAMAAMAAANAMAanAANNAANAaANANAAANANA 


rs_pb_gb: 
ret 


rs_pbe: 
pop 
pop 


call 
mov 
or 
ret 


com_pb endp 


scc_pb proc 


assume 


push 
push 


MOV 
call 
jnz 


pop 
ine 
out 


bx 
dx 


rs_stat 
al, bl 
ah,com_te 


near 


es:code, ds:nothing, 


dx 
ax 


ah, sce_txd 


dx 


; 4f SCC 28530, 


exit for put 


if SCC 28530, 
else INS8250, 


get return st 


wee wee we 


indicate time 


; ah = Oth 
es:nothing, ss:not 


; save dx = 
} save characte 


; wait for tran 
; if time-out, 

; restore chara 
3; dx = 


; else, 


; restore dx = 


dx = 


byte error 


restore dx 
restore dx 


atus 


out error 


hing 


scco_ctl_x 
output in al 


r to 
smit ready 
take jump 


eter 


scc_data_x 
output the character 


scc_ctl_x 


sec_ctl_x 


restore character to output in bl 


scce_ctl_x 
com_data_x 


restore character to output in al 


to output in al 


INS8250 
Receive 


Input: 


Output: 
Trash: 


Assumes: 


proc 
assume 


push 
mov 
add 
out 


mov 
ine 


ine 
call 


jnz 


mov 
dec 
eall 
jnz 


and 


pop 
in 
ret 


rs_gbe: 
pop 


or 
ret 


com_gb endp 


scc_gb proc 


assume 
push 
mov 
call 
jnz 


inc 


Get Byte (com_gb) & SCC 28530 Get Byte (scc_gb) 


Character to RS-232 Interface. 


of 28530 channel (scc_ctl_x). 


of 8250 data port (com_data_x). 


ex = RS-232 time-out 

dx = if dh = 0, then address 
if dh <> 0, then address 

al = character received 

ah = line status 


bx destroyed, 


com_mctl_x 
com_lstat_x 
com_mstat_x 


scc_data_x = 


near 


es:code, ds:nothing, 


dx 
al,com_dtr 
dx,4 

dx, al 


ah,com_dsr 
dx 

dx 

rs_ws 
rs_gbe 


ah, com_rxd 
dx 


dx 


ah,com_te 


near 
cs:code, 


ds:nothing, 
dx 

ah, scce_rxd 

rs_ws 

rs_gbe 


dx 


= com_data_x + 4 = dx + 4 
= com_data_x +5 = dx + 5 
= com_data_x + 6 = dx + 6 
sce_ctl_x + 1 = dx + 1 

; ah = 02h 
es:nothing, ss:nothing 


; save dx = 

; Signal DTR 
3; dx = 
; 


com_data_x 


com_mctl_x 


send to modem control register 


; wait for DSR 


; dx = com_msta 


t_x 


; wait for modem status register 


; if time-out, 


wait for rece 
dx = com_lsta 


wee we we we 


if time-out, 


take jump 


ive ready 
t_x 


take jump 


wait for line status register 


> Only interested on low nibble. 


; restore dx = 
; else get char 


exit for get 
if SCC 28530, 
else INS8250, 
indicate time 


; ah = O2h 
es:nothing, ss:not 


; Save dx = 
; wait for rece 
; if time-out, 


5 ax = 


com _ data_x 
acter 


byte error 
restore dx 
restore dx 

out error 


hing 


sce_ctl_x 


ive ready 


take jump 


sce_data_x 


scc_ctl_x 
com_data_x 
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E956 


E957 
E958 


E95A 
EQ5A 


EQ5A 


E987 


E987 


E987 
E988 


E989 
EQ98A 
E98B 
E98C 
E98D 
E98E 
E98F 
E990 
E995 


E9B2 


E9 B4 
E9B8 


E9BC 
E9BE 
E9CO 


E9C4 
E9C6 
E9C8 


EB B5 


FB 
FC 


50 
53 
51 
52 
56 
57 
1E 


2E: 


06 


E4 
8A 


BA 


E8 
E9 


8E 1E E5F2 R 


60 
EO 


EBC3 R 
EASE R 


TE 


3E 0084 R 
C4 7D 02 


DB 
c9 
2E 0017 R 


AAADAANDAANDAAAAAAAAAAAAAANRAANANAAAAARAAANAANDAAAARAAANDAANANAAAAANANANANADAAANAAANAANANANAADARAANDNMQANQAAAANANANANANANNANQANAANNNAANANNAANAAAAAA 


in al,dx ; else get character 
pop dx ; restore dx = scc_ctl_x 
jmp short rs_pb_gb 
scec_gb endp 
code ends 
include kb2.asm 
PESTS SSS Sess sess esses s sees sess Sess s Sess sess sssessessesssssseessssssssesse 
; Filename: kb2.sre 
A 
$ This module includes INT 09h & 16h. 
; 
PSS SESS SS SSeS s sss sess sess esse sesss esses esses ssssssesesseessssssssssssess 
code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
ORG OE987h 
PSSSSSSSSSS SSS SSS SSS SSS SSS SS SSS SSS SS SSS SS SSS SSSSSS SSS SSS SS SSS SS SSS ESSE 
; INT 09h -- i8041A Keyboard Hardware Interrupt Service Routine 
; 
; Note: ‘make' -> key is depressed -> 00h + key scan code 
; *preak' -> key is released -> 80h + key scan code 
PSSSSSSS SSS SS SS SSS SS SSS SSS SSS SS SSS SSS SSS SSSS SSS SSS SSS SSS SSS SSS SSS SSESSESE 
k_int proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
sti ; re-enable interrupts 
eld ; clear direction flag 
push ax 
push bx 
push ex 
push dx 
push si 
push di 
push ds 
mov ds,word ptr cs:[set_ds_word] ; avoid potential stack problems 
push es 


assume cs:code, ds:data, es:nothing, ss:nothing 


; Get the scan code. 


. 


Reset 


in al,p_kscan ; get scan code from data port 
mov ah,al ; save scan code in ah 


the keyboard. 


mov dx,p_ketrl ; get control port address 
in al,dx ; wet the status 

mov bl,al ; save the status in bl 

or al,080h ; set bit #7 -- reset 

out dx, al ; reset keyboard 

mov al,bl ; retrieve original status 
out dx,al ; send it back to keyboard 


Retrieve the scan code in both al & ah. 


mov al,ah ; scan code in both registers 


Test for overrun scan code from keyboard = OFFh. 


Note: 20 key scan codes can be buffered up by the key board. 
emp al,OFFh ; an overrun scan code? 
jnz k_ok ; if not, continue 
call k_beep ; beep the speaker 
jmp k_nop 
ok: 
ah = scan code (make/break) al = scan code (make/break) 
bx = ? 
cx = ? 
dx St 12 
es:di = ? 
and al,O7Fh ; al = scan code make 
les di,dword ptr ds:[master_tbl_ptr] ; es:di points to master table 
les di,dword ptr es:[di+0002h] ; es:di points to p_kscan table 
xor bx, bx 3 clear bh 
xor ex, cx ; clear cl 
mov ch,byte ptr ds:[(kb_flag] 
mov bl,al ; bx = scan code make 
shl bx,1 ; bx = 2#(scan code make) 
shl bx, 1 ; bx = 4®(scan code make) 
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c 
Cn renee renaen 
Cc 4 ah = scan code (make/break) al = scan code (make) 
C. s bx = 4®(scan code make) = 4#al 
G 5 ch = kb_flag el = 0 
c 3 dx = ? 
Cc es:di = p_kscan base 
Cf en ee nr eee nen nrnae= 
Cc 
E9CA 4B c dec bx ; bx = 4#(scan code make)-1 
c 
E9CB F6 C5 08 c test ch,alt_shift ; alt state? 
E9CE 75 32 Cc jnz ko dx ; if so, has highest priority 
c 
E9DO 4B Cc dec bx ; bx = 4*(scan code make)-~2 
Cc 
E9D1 F6 C5 04 c test ch,cntrl_shift ; control state? 
E9D4 75 2C Cc jnz k_ix ; if so, next highest priority 
c 
E9D6 4B Cc dec bx ; bx = 4*#(scan code make)-3 
Cc 
C ; Handle CapLk Case. 
c 
E9D7T 3C 37 c cmp al,55 ; 0 <= sean code <= (7#8)-1 
E9D9 77 OC c ja k_no_cap ; test NumLk case. 
c 
E9DB F6 C5 40 c test ch, caps_lock_mode ; caplock state? 
E9DE 74 1C c jz k_no_lock ; if not, test shift states 
Cc 
E9EO E8 EB85 R c call k_bit ; get kb_cap_flags bit in of 
E9E3 73 17 c jnb k_no_lock ; (jne) swap if cf set 
Cc 
E9E5 EB OD Cc jmp short k_lock ; honor caps lock. 
Cc 
E9ET7 C k_no_cap: 
Cc 
C ; Handle NumLk Case. 
Cc 
E9E7 3C 47 c emp al,71 ; Scan code >= 71? 
E9E9 72 11 c jb k_no_lock 
E9EB 3C 53 c cmp al, 83 ; scan code <= 83? 
E9ED 77 OD c ja k_no_lock 
EQ9EF F6 C5 20 c test ch, num_lock_mode ; numlock state? 
E9F2 74 08 c jz k_no_lock ; if not, test shift states 
c 
EQF4 C k_lock: ; either caps or num lock. 
E9F4 F6 C5 03 c test eh, (left_shift+right_shift) ; if so, and shift state 
E9F7 74 09 c jz k. ix ; also true 
Cc 
E9FQ9 4B c dec bx 3; bx = 4#(scan code make)-4 
E9FA EB 06 c jmp short k_ix ; (base case) 
Cc 
EQFC C k_no_lock: ; neither caps or num lock. 
E9FC F6 C5 03 Cc test ch,(left_shift+right_shift) ; (shift state) 
E9FF 75 01 c jnz ki ix 
EAO1 4B c dec bx ; bx = 4#(scan code make) -4 
c § jmp short k_ix ; (base case) fall through 
Cc 
c 
EAO2 Cc kixs ; bx = index into p_kscan table 
EAO2 D1 E3 c shl bx,1 ; bx = p_kscan word index 
EAO4 03 FB c add di, bx ; add p_kscan base & index 
Cc 
EAO6 26: 8B 15 c mov dx,word ptr es:[di] ; get data word from table 
c 
EAO09 33 DB c xor bx, bx 3 clear bh 
EAOB 8A DA c mov bl,dl ; move translated key to bx 
EAOD F6 06 0018 R 01 c test byte ptr ds:[kb_flag_1],dlx_kb ; are we a deluxe keyboard 
EA12 74 02 c jz k_xlat . key 
Cc 
EA14 8A DE Cc mov bl, dh ; move translated deluxe 
: ; key to key 
EA16 C k_xlat ; bx has translated byte (bh=0) 
C 
Cpt rn nn ne en ee = =e 
c }; ah = scan code (make/break) al = scan code (make) 
Cc 3 bx = deluxe keyboard translated byte (bh = 0) 
Cc 3 ch = kb_flag el =0 
© 3 dx = es:[di] (could be deluxe key code) 
Cc . es:di = p_kscan base + p_kscan scan code word index 
Co pee en ren ne ne ne nn ne nn nn + 
C 
C ; Registers are all loaded up. Start going through the cases. 
Cc 
EA16 OA D2 c or dl,dl ; deluxe scan codes are 
EA18 74 1C c Jz k_no_case ; NEVER special cases!!!! 
c 
C 3; Test for special cases, 
Cc 
EA1A 80 FB CO Cc emp b1l,O0COh ; xXlated byte special case? 
EA1ID 72 17 c jb k_no_case ; if not, handle unspecial case 
EA1F 80 FB D8 C emp b1l,O0D8h ; OCOh <= xlated byte <= OD8h 
EA22 77 12 ¢ ja k_no_case ; if so, do the special function 
Cc 
C 3; Test for ‘break' of special case. 
C 
EA24 80 FB C8 c emp bl,O0C8h ; is xlated byte a shift key? 
EA27 72 04 Cc jb k_jmp ; if so, do ‘break' of shift key 
Cc ; OCOh <= xlated byte < OC8h 
EA29 OA E4 c or ah,ah 
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EA67 
EA6A 
EA6D 


EA6F 
EAT75 


EA78 
EAT78 


EATD 


EA80 
EA85 


EA87 
EA8B 
EA8E 
EA91 


EA92 
EA97 
EA99 


OA 
78 


F6 
74 
3c 
74 
80 
EB 


OA 
15 


8B 
EB 


8A 


E8 
74 


80 
80 
75 


CT 
EQ 


80 


E8 


80 
74 


8B 
83 
AO 
EE 


F6 


75 
EB 


E8 


EB 


F3 
E6 


FF A4 EA66 R 


E4 
21 


06 0018 R 08 
OB 
45 
16 
26 0018 R FT 
OF 


D2 
04 


C2 
02 


C3 


EBAD R 
03 


EBA4 R 


E5 0C 
FD OC 
EC 


06 0072 R 1234 


DD5A R 


OE 0018 R 08 


EBA4 R 


3E 0049 R O7 
OB 


16 0063 R 
c2 O04 
0065 R 


06 0018 R 08 
F9 
C3 


EBA4 R 


ARO AAKDADAAOAODMEAHAHHAGAHAAAAHDADAAANOAHDAHAAHAAAANDANAADAAAAAAGDAAAAGBAAAAGAGAAAAAAAAAGAHAAAAAAAGAAVAAAGAAARRARGAA 


js 


k_jmp: 
mov 
shl 


jmp 


k_no_case: 
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k_none ; nothing for ‘break' of others. 


; jump to special case routine. 
si,bx ; if so, si gets special index 
81,1 ; make it a word index 
es:[si+( (offset k_case)-(2*0COh))] 


; Test for ‘break' of non special case. 


or 


js 


ah,ah 
k_none ; do nothing if ‘break' of key. 


; Test for ‘unpause' case. 


k_no_hold: 


byte ptr ds:[kb_flag_1],pause_mode are we in hold state? 


k_no_hold if not, continue. 
al,num_lock_key don't clear hold state 
k_none on num_lock_key (Pause). 


reset hold state bit & 
ignore the key. 


byte ptr ds:(kb_flag_1],not pause_mode 
short k_none 


; Test for deluxe scan code. 


or 
jnz 


mov 
jmp 


k_no_xcode: 
mov 


k_buf: 


call 
jz 


k_none: 


; Send specific 


eall 


k_nop: pop 
pop 
pop 
pop 
pop 
pop 


dl,dl 
k_no_xcode 


ax, dx 
short k_buf 


; move deluxe key to scan code 
; put ax into the buffer 


al,bl ; move translated key to key 

; put ax into kb_buffer. 

; try to put ax into kb_buffer. 
k_try ; zf set (z) if buffer is full 
k_nop ; zf reset (nz) if buffer got ax 


; scan code translate to nothing 


end of interrupt (SEOI) to pic ‘command' port. 


k_eoi 


es 
ds 
di 
si 
dx 
ex 
bx 
ax 


; send specific end of interrupt 


; restore registers without issuing SEOI 


ch, (alt_shift+centrl_shift) 
ch, (alt_shift+entrl_shift) ; is it CTL ALT shift? 


k_none 


; CTL ALT DEL system reset. 


mov word ptr ds:[reset_flag],01234h ; set flag for warm boot 
jmp diagnostics_1 ; re-boot 

pone eee ee ee nn nnn nnn nnn nn nnn nr nnn nnn rr rrrne 

; Pause waiting for another key. ‘make' only 

; tid 

k_pause: 
or byte ptr ds:[kb_flag_1],pause_mode ; set the pause bit. 
eall k_eoi ; send specific end of interrupt 


; Note: Video not disabled during vertical retrace. 


emp 


je 


k_hold: test 


byte ptr ds:[v_mode],7 ; never on a monochrome card 

k_hold 

dx,word ptr ds:[v_base6845] ; get 6845 pointer register 

dx,4 ; get 6845 mode control register 
al,byte ptr ds:[v_3x8] ; get the video mode last sent 

dx, al ; enable video 

byte ptr ds:[kb_flag_1],pause_mode ; test the pause bit. 
k_hold ; loop until pause bit cleared 


short k_nop 


“make' only. 


; send specific end of interrupt 
; issue print screen interrupt 
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ROM BIOS 


Listing 
c 
c Gr rrr nner 
C. .' Deluxe code put NUL into kb_buffer. ‘make' only. , 
Cp een nnn sennan 
c 
EAA2 B8 0300 C k_nul: mov ax,0300h ; NUL=X03 
EAA5 EB AF c jmp short k_buf ; put ax into the buffer 
Cc 
Cpt en mn nme mr mene nnn n nnn n nnn meen eee en sence ccescscesaes 
C ; Four state shifts. ‘“make' & ‘break' in kb_flag_1 plus history in kb_flag. 
Cf ne nents 
Cc 
EAAT BO 80 C k_ins: mov al,insert_shift ; INS toggle lock 
EAA9 E8 EAD4 R c eall k_4tog ; toggle 4 state 
Cc 
EAAC OA E4 Co} or ah, ah ; is INS toggle ‘make' ? 
EAAE 78 AB c js k_none ; if not, exit 
EABO B8 5200 c mov ax, (insert_key #100h)+00h ; else, ax gets deluxe INS key 
EAB3 EB Al Cc jmp k_buf ; put ax into the buffer 
c 
Cc 
EAB5 BO 40 C k_cap: mov al,caps_lock_shift ; CAPS LOCK toggle lock 
EAB7 E8 EAD4 R Cc eall k_4tog 3; toggle 4 state 
EABA B1 01 Cc mov e1,00000001b ; CAPS LOCK LED is bit #0. 
EABC E8 EB63 R Cc call k_LED_cap ; send LED information 
EABF EB 9A C k_noni: jmp short k_none 
c 
Cc 
EACi1 BO 20 C k_num: mov al,num_lock_ shift ; NUM LOCK toggle lock 
EAC3 E8 EAD4 R c call k_4tog ; toggle 4 state 
EAC6 B1 02 Cc mov c1,00000010b ; NUM LOCK LED is bit #1. 
EAC8 E8 EB59 R c eall k_LED_num ; send LED information 
EACB EB F2 c jmp short k_non1 
Cc 
Cc 
EACD BO 10 C k_ser: mov al,scrl_lock_shift ; SCROLL LOCK toggle lock 
EACF E8 EAD4 R c call k_4tog ; toggle 4 state 
EAD2 EB EB c jmp short k_noni 
Cc 
Cc 
EADS OA E4 C k_4tog: or ah, ah ; is toggle shift ‘make' ? 
EAD6 78 OF c js k_4res ; if ‘break' reset kb_flag_i 
c 
EADS 84 06 0018 R c test byte ptr ds:[kb_flag_1],al 3; if “‘make', test bit. [ | 
EADC 75 08 Cc jnz k_4ret ; return if already pressed 
c ew 
EADE 08 06 0018 R c or byte ptr ds:[kb_flag_1],al ; set the bit. 
EAE2 30 06 0017 R c xor byte ptr ds:[kb_flag],al ; toggle kb_flag history. 
EAE6 C3 C k_4ret: ret 
c 
EAET7T F6 DO C k_4res: not al 
EAE9 20 06 0018 R Cc and byte ptr ds:([kb_flag_1],al 3; if “break', reset bit only. 
EAED C3 Cc ret 
Cc 
Cr rn re ee eee enn enn nee- 
Cc 3 Two state shifts. ‘make' & ‘break' in kb_flag only. 
Cj ne ne en ne eee ee ee eee 
c 
EAEE BO 08 C k_alt: mov al,alt_shift ; ALT set/reset kb_flag 
EAFO E8 EBOF R c call k_2tog ; toggle 2 state 
c 
EAF3 33 CO Cc xor ax, ax ; scan code of ah = 0. 
EAF5 86 06 0019 R c xchg al,byte ptr ds:[alt_input] ; alt_input gets 0. 
EAF9 OA CO c or al,al j was alt_input 0? 
EAFB 74 C2 c je k_noni ; if so, do nothing. 
EAFD E9 EA56 R Cc jmp k_buf ; else, put it into buffer. 
Cc 
C 
EBOO BO O04 C k_etl: mov al,centrl_shift ; CTL set/reset kb_flag 
EBO2 EB 06 (4 jmp short k_2ret ; toggle 2 state and return 
Cc 
Cc 
EBO4 BO 02 C k_lsh: mov al,left_shift ; LEFT SHIFT set/reset kb_flag 
EBO6 EB 02 : jmp short k_2ret ; toggle 2 state and return 
c 
EBO8 BO 01 C k rsh: mov al,right_shift ; RIGHT SHIFT set/reset kb_flag 
Cc 3 jmp short k_2ret ; fall through 
c 
cC 
EBOA C k_2ret 
EBOA E8 EBOF R c call k_2tog ; toggle 2 state 
EBOD' EB BO [ jmp short k_non1 
c 
EBOF OA E4 C k_2tog: or ah,ah ; is set/reset shift ‘make' ? 
EB11 78 05 c js k_2res ; if ‘break', reset bit only. 
c 
EB13 08 06 0017 R Cc or byte ptr ds:[kb_flag],al ; if ‘make', set bit only. 
EB17 C3 Cc ret 
c 
EB18 F6 DO C k_2res: not al 
EB1A 20 06 0017 R c and byte ptr ds:[kb_flag],al ; if ‘break', reset only. 
EBIE C3 Cc ret 
c 
Co et rr rr rn ne nn en ne ee ee eee eee 
Cc ‘ Alternate Numeric Keypad. “make' only. 
Cc  WSSSe Ss se SSS ser SeSSss SS SS eesessSsSe ss SSS ees S66 SeSeeseSsessesseecees== 
Cc 
EB1F 41 C k_alt9: ine Cx ; Alternate Numeric Keypad #9 
EB20 41 C k_alt8: ine ex ; Alternate Numeric Keypad #8 
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EB35 
EB37 
EB3A 
EB3C 


EB3F 


EB42 
EB45 
EB49 
EBAD 
EB52 
EB54 
EB56 


EB59 


EB59 


EB59 
EB5E 
EB60 


EB63 
EB63 
EB65 


| EB67 
EB6B 
EB6D 


EB70 
EB70 
EB72 
EB74 


EB76 
EB78 


EB7A 
EB7A 
EB7C 
EBTE 


EB80 
EB82 
EB8 4 
EBB 4 


EB85 


EB85 


BO 
E8 
74 
E9 


EQ 


OA 
26 0019 R 


OO1E R 

1E OO1A R 

1E OO1C R 

06 0071 R 80 
1B 

co 

EA56 R 


06 0018 R 01 
03 
F1 80 


E4 
1D 


06 0017 R 
03 
F1 80 


PAAGADADAADAM AGAMA AAA AMAAMADNDDAAAANAAMAAAADAANDAAFAAAAAANAAAAAANAAAAAAADAMBAAAAAAAAAARAAAAAAAAADAANANAAAAAAAAAAAAAAAAA 


ROM BIOS 
Listing 


Keypad #6 
Keypad #4 
Keypad #2 


Keypad #0 


(10#alt_input)+el 


if buffer is full 


again. 


k_alt7: ine ex ; Alternate Numeric Keypad #7 
k_alt6: ine ex ; Alternate Numeric 
k_alt5: ine ex ; Alternate Numeric Keypad #5 
k_alt4: ine ex ; Alternate Numeric 
k_alt3: ine ex ; Alternate Numeric Keypad #3 
k_alt2: ine cx ; Alternate Numeric 
k_alti: ine ex ; Alternate Numeric Keypad #1 
k_alto: ; Alternate Numeric 
mov al,10 
nul byte ptr ds:[alt_input ] ; @alt_input = 
add al,cl 
mov byte ptr ds:[alt_input],al 
jmp short k_noni 
; eeemeeeeeese eee wee we wee eer eww ew ee em ewe wee eee ew ew ewe weer ee eeereeer errr oerererr2e2re2= 
; Double Zero on Keypad. ‘make' only. 
H waeewe eee we em weer ewe eee ee ew em ewe eee ewww ee ewe eee em ew ee wwe ee err ererrrerrerrereeerrerrn 
k_00: mov alo" ; try to put ax into kb_buffer. 
eall k_try ; zf set (z) 
jz k_nop1 ; zf reset (nz) if buffer got ax 
jmp k_buf ; put it into buffer, 
k_nop1i: jmp k_nop 
H weeeeece ewe ewe eee eer eeoe ee ee eee em ee eoew eee eee eee eee ew eee eee eee esr eee eeeereeeee* 
; Break key sequence. ‘make' only. 


test 
jz 


xor 


k_LED_emd: 


k_LED_dat: 
in 
test 
jnz 


mov 
out 

k_LED_ret: 
ret 


k_LED_nun 


Input: 


Output: 


bx, ds:(offset kb_buffer) 
word ptr ds:[buffer_head],bx 
word ptr ds:[(buffer_tail],bx 
byte ptr ds:[bios_break],80h 
1Bh 

ax,ax 

k_buf 


ah scan code (make or break) 
al 
el 


Non 


al & cl destroyed. 


proc 
assume 


near 
es:code, ds:data, 
byte ptr ds:([kb_flag_1],dlx_kb 
k_LED_cap 

e1,10000000b 


ah,ah 
k_LED_ret 


byte ptr ds:[kb_flag],al 
k_LED_emd 
e1,10000000b 


al,kb_status 
al,00000010b 
k_LED_emd 


al,013h 
p_kscan,al 


al,kb_status 
al ,00000010b 
k_LED_dat 


al,ecl 
p_kscan, al 


we wee we we 


es:nothing, 


reset buffer to empty 


turn on bios_break bit 
break interrupt vector 
ax gets deluxe 00h 

put ax into the buffer 


a el 


Puts keyboard LED's in correct state after CAPS/NUM LOCK. 


kb_flag bit for CAPS/NUM LOCK (caps_lock_shift or num_lock_shift) 
00000001b for CAPS LOCK LED or 00000010b for NUM LOCK LED. 


ss:nothing 


are we a deluxe keyboard 

if kb, LED is num_lock 

if deluxe kb, LED is 
~num_lock 


is CAPS/NUM LOCK ‘make' ? 
if not, exit 


is CAPS/NUM LOCK kb_flag set ? 
if not, LED data is ok. 
else, flip sense of LED data. 


polling loop to send command. 
get 8041 status 

test input buffer bit 
if not ok to write omd, loop. 
keyboard ‘LED' command. 

send keyboard “LED' command. 


polling loop to send data, 
get 8041 status 

test input buffer bit 

if not ok to write data, loop. 
retrieve keyboard “LED' data. 
send keyboard “LED' data. 


Input: 


Output: 


al = sean code (make) 
el =0 
es:di = p_kscan base 


ef set if kb_cap_flags bit 


si destroyed. 


Get kb_cap_flags bit into the carry flag (cf). 


near 


es:code, ds:data, es:nothing, 


ss:nothing 


ROM BIOS 
Listing 


c 
EB85 8B F3 c mov si,bx ; save bx 
c 
EB87 33 DB Cc xor bx, bx 3; clear bh 
EB89 8A D8 c mov bl, al ; bx = scan code (make) index 
c ; bx = 00000000 OOxxxyyy 
Cc 
EB8B B1 03 c mov el,3 ; rotate right bx 3 
EB8D D3 CB c ror bx, cl ; bx = yyy00000 00000xxx 
c 
EB8F B1 03 c mov c1,3 ; rotate left bh 3 
EB91 D2 C7 c rol bh,cl ; bx = O00000yyy 00000xxx 
Cc ; bh = remainder = (0-7) 
Cc ; bl = quotient = (0-6) 
c 
EB93 8A CF Cc mov el, bh ; cl = remainder = (0-7) 
EB95 32 FF c xor bh, bh ; bx = quotient = (0-6) 
c 
c 
EB97 26: 8A 59 FY c mov bl,byte ptr es:[di+bx-7] ; bl = proper cap_flags byte 
Cc 
EB9B D2 D3 c rel bl,cl ; rotate (0-7) times into bit #7 
EB9D 32 C9 Cc xor el,cl ; cl = 0 
EB9F DO D3 c rel bi. 1 ; rotate into cf bit #7 
Cc 
EBA1 8B DE c mov bx, si ; restore bx 
EBA3 C3 c ret 
c 
EB A4 Cc k_bit endp 
Cc 
Cf 
Cc 3 Input None 
Cc 3 Output: None 
Cc 3 
Cc 3 Trash: al & dx destroyed. 
Cf 
c 
EB A4 C k_eoi proc near 
Cc 
C ; Send specific end of interrupt (SEOI) to pic ‘command' port. 
Cc 
EBA4 FA C eli ; disable interrupts 
EBA5 BO 61 c mov al, pic_seoi_1 ; specific end of interrupt 
EBA7T BA 0020 c mov dx, pic_O ; command to pic ‘command' port. 
EBAA EE Cc out dx,al 
EBAB FB c sti ; enable interrupts 
EBAC C3 Cc ret 
c 
EBAD C k_eoi endp 
c 
Cp re rere re mmm mm mm 
Cc (; Try to put ax into the kb_buffer. 
Cc 3 
Cc ys Input: ax = word to put in kb_buffer. 
Cc 4 Output: zf set (z) aif buffer is full. (ax trashed) 
G % zf reset (nz) if buffer got ax. (ax saved) 
Cc 3 
Gc 6¢ Trash bx, cx, dx, & si destroyed (in general). 
‘ Fn eee men rene meen meme nnn nee ns 
EBAD C ktry proc near 
Cc assume ocs:code, ds:data, es:nothing, ss:nothing 
Cc 
EBAD 8B 1E OO1C R c mov bx,word ptr ds:[buffer_tail] ; get buffer end pointer 
EBB1 8B F3 c mov si,bx ; save the value 
EBB3 E8 E86E R c eall k_adv_ptr ; advance the tail 
Cc 
EBB6 3B 1E OO1A R Cc cmp bx,word ptr ds:[(buffer_head] ; has the buffer wrapped around 
EBBA 74 07 c je k_beep 
¢C ; zf is reset (nz) 
EBBC 89 04 c mov word ptr ds:[si],ax ; store the value 
EBBE 89 1E 001C R Cc mov word ptr ds:[buffer_tail],bx ; move the pointer up 
EBC2 C3 c ret ; return zf reset (nz) 
Cc 
EBC3 C k_try endp 
Cc 
C. Jseeseeea se SSS Se Sess sassesanes assesses Se sess eesKeseesiceeeresaeeres== 
Cc ; Input None 
GC -3 Output: zf set (z) always. 
Cc 3 
Gr. Trash ax, bl, cx, & dx destroyed. 
c fn rr rrr rn nnn cnn nnn nnn ener nnn 
c 
EBC3 C k_beep- proc near 
Cc assume cs:code, ds:data, es:nothing, ss:nothing 
c 
EBC3 E8 EBA4 R c eall k_eoi ; send specific end of interrupt 
Cc 
EBC6 BA 0061 C mov dx, p_ketrl ; get kb control port address 
EBC9 EC Cc in al,dx 3; get control data 
EBCA 8A EO c nov ah,al ; save control data 
7 
EBCC B3 80 Cc mov bl,80h ; outer loop counter 
Cc 
EBCE 24 FC CG Kelp: and al,OFCh ; turn off speaker data 
EBDO EE Cc out dx, al 
Cc 
EBD1 B9 0048 (@3 mov ex,48h ; set up count 
EBD4 E2 FE Cc loop $ ; delay awhile 
Cc 


EC2F 
EC30 


EC30 


000c 
OOOE 
OOOF 
0001 
0000 


u" 


0025 


EAAT 
EAB5 
EAC1 
EACD 
EAEE 
EBOO 
EBO 4 
EBO8 


Dumwmwdwwwy 


EA67 
EB42 
EA7T8 
EAQB 
EAA2 
EA5B 


Duo Dw wy 


EBIF 
EB20 
EB21 
EB22 
EB23 
EB24 
EB25 
EB26 
EB27 
EB28 


BUDD amDwwww 


EB35 


bo] 


BA 03F4 90 


PAAAPPPAQVAVGAGAAAGAAGAAAAQAANAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGAAAAAAAAAGaaaaa 


QAAAANRAANANAAAANAANAAAAAaAaa 


or al,02h 
out dx, al 
mov ex,48h 
loop $ 
dec bl 
jnz k_lp 
mov al,ah 
out dx,al 
ret 

k_beep endp 


k_datal proc 


ROM BIOS 
Listing 


; turn on speaker 

; set up count 

; delay awhile 

; decrement outer loop counter 


; zf is set (z) 
; restore control data 


; return zf set (z) 


k_case dw k_ins ; kbins (0COh) - 
dw k_cap ; kbeap | 
dw k_num ; kbnum 
dw k_ser ; kbser 
dw k_alt ; kbalt ‘make't & ‘break! 
dw k_ctl ; kbetl | 
dw k_lsh ; kblsh | 
dw k_rsh ; kbrsh Vv 
dw k_res ; kbres (0C8h) - 
dw k_brk ; kbbrk H 
dw k_pause ; Pause | 
dw k_prt ; kbprt | 
dw k_nul ; kbnul 
dw k_none ; NONE 

’ 
dw k_alt9 3; kdec9 
dw k_alt8 ; kdec8 
dw k_alt7 3 kdec7 ‘make' only 
dw k_alt6 ; kdec6 
dw k_alt5 3; kdec5 | 
dw k_alt4 ; kdec4 | 
dw k_alt3 ; kdeo3 
dw k_alt2 3; kdec2 | 
dw k_alti ; kdecl | 
dw k_alto ; kdecO | 
| 
’ 

dw k_00 ; kdblO (OD8h) Vv 


k_datal endp 


code ends 
include fdu4.asm 


PO I FS SO ew RE TOF RNS) 1s WOR! TOG: Be 1M) SO, (8. WE a) 0: OO) WR 18k 6, 65 UTR ee Si Kw. 0) LO! 6 WL TO) BE: Ww (OO: OY 8) ay 8: Ser Aye Hr WW O10: Hb SE MR HOS 


; NEC status port 

3 NEC busy. 

5 no. 

> Save from previous operation. 


; reset call. 


; restore from previous op. 


code segment public 'ROM' 
assume cs:code, ds:data, es:nothing, ss:nothing 
f_nec_reset proc near 
mov dx, f_nec_status 
in al,dx 
emp al,10h 
jne f_nec_reset_ret 
mov al,diskette_status 
push ax 
xor ax,ax 
mov dx,ax 
int 13h 
pop ax 
mov diskette_status, al 
f_nec_reset_ret: 
ret 
f_nec_reset endp 
code ends 


include fdul.asm 


PHFFFFFFFFFFFIFFIFFFT TIFFS SIGE )~©EQUATES 
Controller constants 
f_srt_48 equ 1100b 
f_srt_96 equ 1110b 
f_hut equ 1111b 
f_hlt equ 1 
f_ndma equ 0 
f_motor_wait equ 37 
f_drive equ [bp+0] 

f_head equ [bp+1] 
f_numsecs equ [bp+2] 
f_command equ [bp+3] 
f_bufoff equ [bp+4] 
f_secnum equ [bp+6] 

f_eyl equ [bp+7] 
f_real_drive equ [bp+8] 


Ce ee ee 


EES PF SG Ve POP De OTS RD 


48TPI Step Rate Time (6 ms @ 4 Mhz) 
Q6TPI Step Rate Time (4 ms @ 4 Mhz) 
Head Unload Time (480 ms @ 4 Mhz) 
Head Load Time (4 ms @ 4 Mhz) 

Not DMA bit (0 = dma on) 


no. of RTC ticks before turning 
motor off. (f_motor_wait x 55ms) 


byte pointer. 
byte pointer. 
byte pointer. 
byte pointer. 
word pointer. 
byte pointer. 
byte pointer. 
byte pointer. 
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ROM BIOS 


EC9B E8 EC18 R 
EC9E BB 0002 
ECA1 E8 EDFF R 


ECA4 A2 


ECAT 32 CO 


ECA9 8A 26 0041 


OO40 R 


ECAD 80 FC 01 


R 


; f_nec_reset is located in the module called special.srec. 


Listing 
Gc Floppy Disk port addresses 
Cc 

= 03F2 C f_motor_port equ O03F2h ; drive select port 

= O3F4 C f_nec_status equ O3F4h ; disk controller status port 

= 03F5 C f_nec_data equ O3F5h ; disk controller data port 
c 
Cc (3 Floppy Disk commands 
c 

= 00EF6 C f_read_emd equ OE6h ; read data 

= 00C5 Cc f_write_cmd equ OC5h ; write data 

= OO4D Cc f_format_emd equ O4Dh ; format 

= 0007 C f_recal_cemd equ 007h ; recalibrate 

= 0008 C f_snsint_cemd equ 008h ; sense interrupt 

= 0004 C f_snsdrv_cemd equ 004h ; sense drive 

= 0003 C f_specify_cemd equ 003h 3; specify 

= OOOF C f_seek_cemd equ OOFh ; seek 
Cc 
CC SFSSSFSFSTFT EFSF SE5 55558558888 CODE F555 Ss FST F TFT T TTT T TTT TT TTT PT TR TTT TT TTT OTS 
Cc 

EC30 C code segment public 'ROM' 
Cc assume cs:code, ds:data, es:nothing, ss:nothing 
c 
Cc 
: PITT TTI T ITTF ITT TT IIIT TPIT PITA PTD IFIIIIFIIIFIDIFIIIII IDI IIIIIIIIIIPI III IITIIIOD 
c 

EC59 c ORG OEC59h 

EC59 C fd_io proc far 
c 

EC59 FB Cc sti ; enable interupts 

ECSA 55 c push bp 

EC5B 1E Cc push ds 

EC5C 56 C push si 

EC5D 57 c push di 

ECSE 52 c push dx ; head & drive# 

ECSF 51 c push ex ; cyl. & sect 

EC60 53 c push bx ; buffer offset 

EC61 50 c push ax ; command & #secs 

EC62 52 ¢ push dx ; this one gets modified(96 TPL) 

EC63 8B EC c mov bp, sp ; BP preserves SP throughout 
Cc 
C 3; test command code & use jump table to jump to appropriate routine 
Cc 

EC65 2E: 8E 1E E5F2 R c mov ds,word ptr cs:[set_ds_word] ; DS = data_seg (40h) 

EC6A 80 26 OO3F R OF c and motor_status,0OFh ; preserve motor on bits. 

EC6F 80 FA 01 c emp dl,1 ; max. drives 

EC7T2 77 05 c ja f_iol ; drive out of range. 

EC74% 80 FC 05 c emp ah,5 ; max. command. 

EC77 76 07 c jbe diskette_iol ; command in range 

ECT79 c f_Lol% 

EC79 Ct 06 0041 R 01 Cc mov diskette_status, cmd_error ; Oh 

EC7E EB 1B e jmp short f_io_ret ; quick return 

EC80 C diskette_io1: 

Ec80 FC c eld ; Autoincrement for strings. 

EC81 E8 EFAD R Cc call f_check_valid ; Will not return if error. 

EC84 32 FF c xor bh, bh ; clear high byte 

EC86 8A DC c mov bl,ah ; move selection into low byte 

EC88 D1 E3 Cc shl bx, 1 ; multiply by 2 

EC8A 2E: FF AT EC8F R c jmp es:[f_table.bx] 
c 
c FOFIFIPIIIIFIPIIITIFIFIFIFIIFIIFIFIFIIFIFIFIIFIFIFIIFIFIFIIFIFIIIIFIFIFDIIIIDIDD 
Cc 

EC8F C f_table label word 
Cc 

EC8F ECBF R C dw f_reset ; AH = 0 (reset) 

EC91 EC9B R c dw f_io_ret ; AH = 1 (status) 

EC93  ED65 R Cc dw f_rdata ; AH = 2 (read) 

EC95 ED39 R c dw f_wdata ; AH = 3 (write) 

EC97 ED65 R Cc dw f_rdata ; AH = 4 (verify) 

EC99 ED39 R c dw f_wdata ; AH = 5 (format) 
Cc 
: PITT FIFTIITIFIDTITTI DIFF ITIFIIIFITIFIIIITIIIIIIIFIIIIIIIIIOIIIIISISISSIIIOIIDDD 

ECOB Cc f_io_ret: 
c 
c 
c 
c 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
c 
Cc 


ECBO F5 
ECB1 8B E5 
ECB3 5B 
ECB4 5B 
ECB5 5B 
ECB6 59 
ECB7 5A 
ECB8 5F 
ECB9 5E 
ECBA 1F 
ECBB 5D 
ECBC CA 0002 
ECBF 


call f_nec_reset ; reset if necessary. 
mov bx,2 ; motor_wait parameter. 
eall f_get_var > Returns 0 in AH, 
mov motor_count, al ; motor shut off value. 
xor al,al ; zero AL. 
mov ah, diskette_status 
emp ah,1 
eme 
mov sp,bp ; for safety sake. 
pop bx ; discard DX. 
pop bx ; discard AX. 
pop bx 
pop ex 
pop dx 
pop di 
pop si 
pop ds 
pop bp 
ret 2 
fd_io endp 
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ee eee eee eee eee eee reer b sere eeeseeeresreeereeseeresesrereseeeeeeeeeeereeene 


PERT TPTT TTT T TTT T TTT T TTT T TTT TTT T TTT T TTT TTT TTT TTT TTT TTT TTS 


; Reset and reprogram the FDC without turning the motors off. 


ECBF f_reset proc near 

ECBF FA eli ; disable interrupts 

ECCO BO 66 mov al, pic_seoi_6 ; specific end of interrupt 
EcC2 BA 0020 mov dx, pic_0O ; to pic ‘command' port. 
ECC5 EE out dx,al 

ECC6 42 ine dx ; pic ‘data’ port. 

ECC7 EC in al, dx ; read mask. 

ECC8 24 BF and al,10111111b ; enable IR6. 

ECCA EE out dx,al 


; Develop mask for motor control port. 


ECCB AO OO3F R mov al,motor_status ; which motor is running? 
ECCE 24 OF and al,OFh ; blow off high 4 bits. 
ECDO 74 OE jz f_r2 ; no motors running. 
ECD2 8A EO mov ah, al 
ECD4 Bi 04 mov el,4 
ECD6 D2 EO shl al,ol ; move to high nib. 

; A motor is on. Find out which one. 
ECD8 fori: 
ECD8 DO EC shr ah,1 ; determine drive select 
ECDA 72 04 je f_r2 ; from motor enable bit. 
ECDC FE CO ine al 
ECDE EB F8 jmp short f_r1 
ECEO f_r2: 


; Reset signal has to be maintained for at least 14 clocks. 


ECEO C6 06 0041 R OO mov diskette_status,0 
ECE5 oc 08 or al,8 3; set bit 3. 
ECE7T BA 03F2 mov dx, f_motor_port 
ECEA EE out dx, al ; send reset signal. 
ECEBB OC 04 or al,4 3 set bit 2. 
ECED C6 06 003E R 00 mov seek_status,0 
ECF2 EE out dx,al ; clear reset. 
ECF3 FB sti 
ECFA E8 EF82 R call f_sis ; sense int. status 
ECF7 B4 03 mov ah, f_specify_omd 
ECF9 E8 EEOC R call f_put_byte 
ECFC BB 0000 nov bx, 0 ; 1st specify byte. 
ECFF E8 EDFF R eall f_get_var 
EDO2 8A EO mov ah,al 
EDO4 £8 EEOC R eall f_put_byte 
EDO7 BB 0001 mov bx, 1 ; 2nd specify byte. 
EDOA E8 EDFF R call f_get_var 
EDOD 8A EO mov ah, al 
EDOF E8 EEOC R call f_put_byte 
ED12 EB 87 jmp f_io_ret 
ED14 f_reset endp 
DiI ieee eee cece rece eee cP eee cree Pee cece eee ee cece rere eres, 
’ 
; (f_motor_on) 
H 
H INPUT: none 
i 
; OUTPUT: Carry set if motor was off, cleared otherwise. 
H 
; DESTROYS: AX, CX 
, 
SIFT FT TTT TFT TTT TTT TTT TTT TTT TT TTS TST RTS STS T ST PS TS SESS PSRSSSSESRESSRSSRRERRREREE 
EDI f_motor_on proc near 
ED14 C6 06 OO4O R FF mov motor_count,OFFh ; max. time for motor. 
ED19 8A 4E 00 mov el, f_drive ; drive. 
EDiC BO 01 mov al,1 
EDIE D2 EO shl al,ol ; mask for motor status, 
ED20 84 06 O03F R test al,motor_status ; test always clears carry. 
EDp24 75 12 jnz f_mo_ret ; already running. 
ED26 A2 003F R mov motor_status, al ; set correct bit. 
ED29 8A E1 mov ah,cl ; drive into AH. 
ED2B Bi 04 mov o1,4 
ED2D D2 £0 shl al,ol ; motor on bit to high nibble. 
ED2F oc OC or al,0Ch ; set bits 2 & 3 (0000 1100). 
ED31 OA C4 or al,ah ; drive bits ( 0 & 1), 
ED33 BA 03Fe2 mov dx, f_motor_port 
ED36 EE out dx, al ; turn on the motor, 
ED37 F9 ato ; motor was off indicator. 
ED38 f_mo_ret: 
ED38 C3 ret 


AQQNaAAGaAAVAGARAAAAAAAAAQAAAAAANRAAARAAAAAAARMAANAAAARAAAAAAAAANMAAAARAAAAANMAAAAAARANAAAAAAAAAAAAAGAMAaGaAAaAaAaAaAaa 
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ED39 C f_motor_on endp 
Cc 
Cc SESERERADERDRERPRDERERRABDDDESSSS PSTD ESET ERED OSES ESSER TERETE ESTE TTT STEER ETT ES 
c 
ED39 C f_wdata proc near 
C 
Cc 
ED39 E8 EDI4 R c call f_motor_on ; sets carry if motor was off. 
ED3C 73 1E Cc jne f_wdi ; motor was on, skip delay. 
Cc 
ED3E E4 67 c in al, sys_conf_b ; read switch, 
ED4O 6F6 DO Cc not al ; toggle the sense. 
ED4¥2 24 02 c and al,2 ; isolate slow motor bit. 
ED44 8A C8 c mov cl,al 
ED46 BA 007D c mov dx, 125 ; 125 ms delay to start with. 
ED49 D3 E2 Cc shl dx, cl ; 125 x 4 
ED4B BB OOOA c mov bx, 10 ; motor start delay parameter. 
ED4E E8 EDFF R c call f_get_var ; returns param, in AL. 
ED51 32 E4 C xor ah,ah ; for good measure. 
ED53 FT E2 c mul dx ; AX has total delay 
ED55 8B C8 Cc mov ex, ax 
ED57 C f_wd_loop: 
ED57 §E8 EF47 R c eall f_wait_one_ms 
ED5A E2 FB c loop f_wd_loop 
c 
ED5C C fwd: 
ED5C 80 OE 003F R 80 c or motor_status,080h ; set high bit, indicate write. 
ED61 BO 4A c mov al,O4Ah ; DMA mode byte: channel 2, 
Cc ; single mode, read transfer 
ED63 EB 22 c jmp short f_rw_common 
ED65 C f_wdata endp 
Cc 
Cc TTET TTT ETT 
c 
ED65 C f_rdata proc near 
Cc 
c 
ED65 80 26 003F R TF c and motor_status,07Fh ; clear high bit, indicate read 
ED6A E8 EDI4 R c eall f_motor_on 
ED6D 73 OE c jne f_rdi ; motor was on, no delay. 
Cc 
C ; slow motor delay loop 
c 
ED6F E4 67 Cc in al,sys_conf_b ; read configuration switch(7W) 
ED71 A8& 02 c test al,2 ; bit 1 = slow drive bit 
ED73 75 08 Cc jnz f_rdi ; 1 = 250 ms motors, no delay 
ED75 B9 O1F4 c mov ex,500 approx. 500 ms delay for 
Cc ; slow motors 
ED78 C f_rd_loop: 
ED78 E8 EF47 R c eall f_wait_one_ms 
ED7B E2 FB c loop f_rd_loop 
Cc 
ED7D Cc frds 
ED7D BO 46 c mov al,O46h ; DMA mode byte: channel 2, 
c ; single mode, write transfer. 
ED7F 80 TE 03 04 Cc comp byte ptr f_command,4 ; Is it a verify command? 
ED83 75 02 c jne f_rw_common ; No, must have been a read. 
ED85 BO 42 Cc mov al,042h ; DMA mode byte: channel 2, 
c ; single mode, verify transfer. 
Cc 
ED87 Cc f_rdata endp 
Cc 
: SSSEERELRERERESASESSASSDSSSDSESE SSS SSSTS SSS ES ESS S SERS TTT TTT T RETR TEES 
, 
C 4 Common (f_rw_common) 
Cc 3 
. ; INPUT: AL dma mode byte. 
’ 
c OUTPUT: 
Cc 5 
Cc 3 DESTROYS: 
Cc 3 
SOSSERSERSSRSERRELIRRRRERRR RPE ES BESS SESS PTET ORFS TTR R ETT S eRe ees i8 as 
ED87 C f_rw_common proc near 
c 
c 
ED87 C6 06 OO4O R FF c DOV motor_count,0OFFh ; long wait. 
ED8C £8 EE73 R c call f_set_dma ; pass mode byte on through. 
c 
C ; Clear out status from previous operation. 
c 
ED8F 06 c push es 
ED9O0 1E Cc push ds 
ED91 O07 c pop es 
ED92 32 CO c xor al,al 
ED94 B9 0007 c mov ox,7 
ED97 BF 0042 R c mov di,offset nec_status 
ED9A F3/ AA c rep stosb 
ED9C O07 c pop es 
c 
ED9D E8 EECD R Cc call f_seek ; On return, f_drive has 
Cc ; head bit or'd in. 
Cc 
EDAOQ 8A 56 03 Cc mov dl,byte ptr f_command ; get command 
EDA3 B4 C5 Cc mov ah, f_write_omd 
EDA5 80 FA 03 c cmp dl,3 ; Is it a write command? 
EDA8S 74 09 C je f_rwi ; yes 
EDAA B4 4D Cc mov ah, f_format_comd 
EDAC 80 FA 05 c cmp 41,5 ; Is it a format command? 


EDAF 
EDB1 

EDB3 
EDB3 
EDB6 
EDB9 
EDBC 
EDCO 
EDC2 
EDC5 
EDC8 
EDCB 
EDCE 
EDD! 

EDD4 


EDD7 
EDD7 
EDDA 
EDDD 
EDDD 
EDEO 
EDE2 
EDE5 
EDE6 
EDE9 
EDEB 
EDEF 
EDF! 
EDF4 
EDFA 


EDF6 
EDF9 


| EDFC 
fm™ EDFC 


EDFF 


EDFF 
EDFF 


EEOO 
EE02 


EEO4 
EEO8 
| EEOA 

EEOB 


EEOC 


EEOC 


EEOC 
EEOF 


EE11 
| EE13 
| EE14 
| EE16 


EE17 
EE17 


EE18 
EE18 
EE1D 


EE20 


74 
By 


E8 
8A 
E8 
80 
14 
8A 
E8 
8A 
80 
E8 
8A 
E8 


B9 
BB 


E8 
8A 
E8 
43 
83 
75 
80 
75 
BB 


E2 
E8 
E8 


E9 


E8 
AB 


15 
42 
8A 
EE 


C3 


c6 
E9 


co 
D8 


36 0078 R 
00 


EF6B R 
40 


05 


cy 


06 0041 
EC9B R 


R 20 


ANDAAAADANDADAADD ADA AARDAANAADAAAARAAANDAAARAAANAANAAAAANADNARAAAANDARAAARANANARAAAANRANAAANAANAaAAAANRAANAAARANAANQaAANAANANANAANAANAaANANAaAAARANANANAAaANQaAaAANAANAN 


fo 


. 
’ 
. 
, 


£ 


f_ 


i 


f_ 


f 


rwi: 


eall 


Get bytes 
If we are 


__rwiskip: 


mov 
mov 

rw2: 
call 
mov 
call 
ine 
omp 
jne 
cmp 
jne 
mov 

rw3: 
loop 


call 
call 


rw_ret: 
jmp 


_rw_common 


f_rwi ; 
ah, f_read_omd : 


f_put_byte 
ah, f_drive 
f_put_byte 
byte ptr f_command,5 ; 
f_rw_skip : 
ah, f_cyl 

f_put_byte 

ah, f_head 

ah,1 : 
f_put_byte 

ah, f_secnum 

f_put_byte 


3,4,5,6 from table. 
formatting then we need bytes 3,4,7,8 


ex,4 
bx, 3 


f_get_var 
ah,al 
f_put_byte 


byte ptr f_command,5 
f_rw3 
bx,7 


mee wee we we we 


f_rw2 


f_wait_for_nec 


f_get_byte ; 
f_io_ret 
endp 


ROM BIOS 
Listing 


yes 
must be read or verify. 


send command. 
has head and drive bits. 


was it a format command? 
yes, skip next 3 params. 


blow off high 7 bits. 


from table. 


no. bytes per sector, 


time to check for format? 


No. 

was it a format command? 
no. 

7th parameter in table. 


get the results. 


~ 
~ 
~ 
~- 
~ 
- 
- 
- 
- 
—- 
- 
— 
- 
~~ 
- 
~ 
- 
- 
- 
— 
-- 
- 
— 
-_ 
- 
- 
— 
~~ 
= 
_ 
~ 
- 
~ 
- 
~ 
ay 
- 
- 
— 
-_ 
— 
— 


Get specified byte from fdu parameter table (f_get_var) 


H 
; 
H 
H 
; INPUT: BX parameter number (0 = 10) 
; 
; OUTPUT: AL The requested byte. 
H 
F DESTROYS: AH 
i 
FIFPP IIIT ITI II IIIP PIII IIIIP IDI IIIIDIPIIIFIIIFIIITIIIIIIIIIFDIIIIOPIDIIIIIIDIIRIDD 
f_get_var proc near 
push ds 
xor ax, ax 
mov ds,ax ; segment 0 
assume ds:abs0 ; tell assembler seg 0: 
lds si,dword ptr [int1Elocn] ; DS:SI points to table 
mov al,[bx+si] 
pop ds 
assume ds:data ; tell assembler seg 40: 
ret 
f_get_var endp 
PITT FID IFIFIFIIIP IPI P PII DI IIIIIIIIIIDII PIPPI PPPS PIII IDIDIDIDIDIP PIII PIII DIIIIIDD 
H 
; Send a byte to the NEC controller (f_put_byte) 
; 
H INPUT: AH byte to output. 
; 
; OUTPUT: 
; 
Pitt titi tt tte eee eee eee eee eee eee ee eee 
f_put_byte proc near 
eall f_nec_rdy ; returns MSR byte in AL. 
test al,40h ; direction bit. 
list 
jnz f_pb_erret ; wrong direction. 
ine dx ; NEC data port 3F5h 
mov al,ah 
out dx, al 
f_pb_ret: 
ret 
f_pb_erret: 
mov diskette_status, fdc_error 
jmp f_io_ret 
f_put_byte endp 
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Listing 
: Ww 
: PITT FIFI IIIIIIFIFFIIFIPIIIIIIIIIDIDIIIIIFFIFFIIIIFIFIFIPIIIDIDIIIIIIIDIFISIOSDRD 
’ 
c ¢ Read the results bytes from the NEC controller (fdu_datal1) 
Cc ; 
G ¢ INPUT: none 
Cc; 
Cc (3 OUTPUT: 
Cc 5 
Cc 5 
Cc H DESTROYS: DX, SI 
Cc 3 
FTTF ITIP TTDI IID IIT I IIIS SS ISS IPITIITIFIIISIIIISIIIIFSISIISIIOI IDI III IIDD IDO DD TSD 
EE20 C fdu_datal proc 
c 
EE20 C f_gb_table label byte 
EE20 04 C db 4 ; record not found. 
EE21 00 Cc db 0 > dummy 
EE22 10 c db 10h ; ere error. 
EE23 08 Cc db 8 ; dma error. 
EE24 00 Cc db (0) ; dummy. 
EE25 04 Cc db 4 ; sector not found. 
EE26 03 c db 3 ; write protect. 
EE27 02 c db 2 ; address mark error. 
EE28 20 c db 20h 3; fde error. 
Cc 
EE29 C fdu_datal endp 
Cc 
EE29 C f_get_byte proc near 
Cc 
EE29 06 c push es 
EE2A 1E c push ds 
EE2B 07 c pop es 
EE2C BF 0042 R Cc mov di,offset nec_status ; ES:DI is now ready for stosb. 
EE2F 8B F7 Cc mov si,di ; offset of nec_status in SI. 
EE31 B9 0007 c mov ex,7 ; maximum no. of bytes. 
EE34 C f_gb_loop: | 
EE34 E8 EF6B R c eall f_nec_rdy ; Returns MSR byte in AL. | 
Cc ; will not return if error. 
EE37 A8& 10 Cc test al,10h 3; busy bit. 
EE39 74 36 Cc jz f_gb_ret ; done. ( 
EE3B A8& 40 Cc test al,40h ; direction bit. 
EE3D 74 05 c jz f_gb_out 3; wrong direction. 
EE3F 42 c ine dx ; point to nec data port (3F5h) 
EESO0 EC Cc in al,dx 
EE41 AA c stosb 
EE42 E2 FO c loop f_gb_loop 
EE44 C f_gb_out: 
EE4S4 80 7E 03 00 c cmp byte ptr f_command,0 ; was it reset command? 
EE4S8 74 27 c je f_gb_ret ; yes. 
EESA AC Cc lodsb ; get STO in AL. 
EESB A8& 20 (3 test al,20h 3; seek end? 
EESD 75 22 c jnz f_gb_ret ; yes. 
EESF a8 CO c test al,O0COh 
BE51 74 1A Cc jz f_gb_jmp 
Cc 
EE53 C6 06 0041 R 20 Cc mov diskette_status, fdc_error 
EE58 AC c lodsb ; get ST1 in AL. 
EE59 B9 0008 Cc mov ex,8 
EE5C 33 DB Cc xor bx, bx 
EE5E C f_gb_loop1: 
EE5E DO CO c rol al,1 
EE60 72 03 c je f_gb_decode 
EE62 43 Cc ine bx | 
EE63 E2 F9 c loop f_gb_loop1 
EE65 C f_gb_decode: 
EE65 2E: 8A 87 EE20 R c mov al,ces:f_gb_table[bx] 
EE6A A2 0041 R C mov diskette_status,al 
EE6D C f_gb_jmp: 
EE6D 07 c pop es 
EE6E E9 ECOB R Cc jmp f_io_ret 
Cc 
EE71 Cc f_gb_ret: 
EE71 07 c pop es 
EE7T2 C3 c ret 
Cc 
EE73 C f_get_byte endp 
Cc 
: FIFI FIIIIIIFIFIFIIFIFIIFIFIFIIFIIFIFIFIFPIIFIIPISIFIIFIFIFIOPIIIIIFIFIIIIDIDIDIDD 
5 | 
Cc }; Test for boundary crossing case then program the 
Cc: § DMA controller (f_set_dma). 
Cc 3 
c¢ 3 INPUT: AL mode byte 
c 3; ES segment of user buffer. | 
Cc H | 
© OUTPUT: WS | 
CG ¢s 
Cc ‘. DESTROYS: AX, BX, CX, DX | 
Cc 3 | 
c FFT T TPIT III III IFOIFIIIFIFIFIFIFIFIFIFIFIFIFIIFIIIIFIFIFITIIIFIIIIIISSIID OD IITDD 
Cc 
EE73 C f_set_dma proc near 
Cc 
EE7T3 C6 06 0041 R 09 c mov diskette_status, dma_seg_error 
EE78 E6 OC c out dma_ff_clr,al ; set to known state. 
EE7A E6 OB Cc out dma_mode,al ; send mode byte. 
EE7C 8B 5E 04 Cc mov bx,word ptr f_bufoff ; offset of user buffer. 
EE7F 8c CO c mov ax,es ; offset of user buffer. 
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28 
06 


OF 


0041 R 00 


00 


OO3E R 


O03E R 


0002 


07 


EEOC R 


66 


00 


EEOC R 
EF82 R 


06 
OA 
E7 
06 


0042 R CO 


0041 R 40 


EC9OB R 


. 
’ 
. 
, 


. 
, 


mee ee wee ee wee we wee wee we we we 


. 
’ 


mov el,4 
rol ax,cl 
mov ch,al 
and ch,OFh 
and al,OFOh 
add bx, ax 
jne f_sdi 
ine ch 
f_sdi: 
mov al,ch 
out dma_segm_2, al 
mov al,6 
out dma_mask_bit, al 
mov al,bl 
out dma_addr_2,al 
mov al, bh 
out dma_addr_2,al 
mov dx, bx 
mov bx,3 
call f_get_var 
mov cl,al 
mov ah, f_numsecs 
xor al,al 
shr ax,1 
shl ax,ol 
dec ax 
add dx,ax 
jne f_sd2 
jmp f_io_ret 
f_sd2: 
out dma_count_2,al 
mov al,ah 
out dma_count_2,al 
mov al,2 
out dma_mask_bit, al 
mov diskette_status,0 
f_sd_ret: 
ret 
f_set_dma endp 
PRIPTPT TIP TITI SIS TETTATIO ERED SOTO SEDER T EP ERD REESE 
, 
; Seek (f_seek) 
, 
;: INPUT: 
’ 
; OUTPUT: 
’ 
: DESTROYS: 
’ 
a a ee Jee ee ae ee ee ee ee eet eee ne ee ee ee 
f_seek proc near 
mov cl,f_drive 
mov al,1 
shl al,el 
test seek_status, al 
jnz f_si 
or seek_status, al 


; Two recalibrate commands required in the case 


mov ex,2 
f_s_recal: 
mov ah, f_recal_emd 
push cx 
eall f_put_byte 
mov ah, f_drive 
call f_put_byte 
eall f sis 
pop ex 
; possibly test bit 4 as well (equipment check.. 
test nec_status,0COh 
jz f_s1 
loop f_s_recal 
mov diskette_status, seek_error 
jmp f_io_ret 
fais 
mov ah, f_seek_cmd 
call f_put_byte 
; prepare second byte of seek command. 
mov al, f_head 
and ak 54 
shl al,1 
shl al,1 
or al,f_drive 
mov f_drive,al 
mov ah,al 
eall f_put_byte 
mov ah, f_eyl 
test byte ptr f_head,80h 
jz f_cont 
shl ah,1 
f_cont: 
call f_put_byte 
eall f_sis 


ROM BIOS 
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shift count 

move high nib around. 

save high nib. 

isolate high nib 

prepare for offset calculation 
20 bit calculation. 


high nib 


high nib. to latoh 


disable channel 2. 

low byte of address. 
high byte of address. 
save buffer offset. 
bytes/sector param 

get param from table 
save for shift count 
get #sectors. 

AX = #sectors x 256 

AX = #sectors x 128 
multiply by bytes/sector, 
DMAC counts zero. 

add count to offset 
exit bovndary crossing. 
low byte of count. 

high byte of count, 


enable channel 2 


a 
get drive# as shift count. 


mask for recal. 


no recal. required. 
set the corresponding bit. 


of 96 TPI drives. 


’ 
, 
. 
, 
. 
’ 


loop coun. for 96 TPI 


recal. command 
save it. 


drive bit. 

end of command phase. 
Sense Interrupt Status 
restore it. 


.track 0 not reached) 


’ 


equipment OK so restore, 


blow off high 7 bits. 
move head to bit 2. 


combine drive bit with head 
and save it. 


test 80 track bit. 
cyl x 2 


end of seek command. 
Sense Interrupt Status 
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EF4T 
EF47 
EF48 
EF4B 
EF4D 
EFUE 
EF4F 


EF4F 


EF4F 
EF51 
EF54 
EF55 
EF56 


51 
B9 
E2 
59 
C3 
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06 0042 R CO 


13 
0009 
EDFF R 
co 

09 

c8 

ED 


EF47 R 
FB 


0176 
FE 


oc 
03F2 


AaRadQnananananaaananannanaadganaaNnaaaananaaanganaaa 


agaagaNgAagaANaaNaNnganganaaantagantaangaanaa 


test 


jnz 
mov 
eall 
or 
jz 
mov 
xor 
f_head_settle: 
call 
loop 
f_s_ret: 
ret 


f_seek endp 


eee ere eee eee sees 


One mill 


f_wait_one_ms 
push 
mov 

w_one: loop 
pop 
ret 

f_wait_one_ms 


> 


; This routine i 


O0 ie) 6 860K 6 She ae Sie ww 


stop_disk 


mov 
mov 
out 
ret 

stop_disk 


include fdu2.asm 


ee 


So PP eS Se oe se 
; 

; 

; INPUT: 

’ 

; OUTPUT: 
, 

’ 

’ 


rt ie fee Ms es et Meee at Ks 


DESTROYS: 


nec_status,0COh ; test for seek end. 

f_s_ret 

bx,9 ; head settle parameter. 
f_get_var 

al,al 

f_s_ret ; head settle = 0. 

el,al ; use settle parm. al loop index 
ch, ch 


f_wait_one_ms 
f_head_settle 


06: S66 6: 01:6) 6 8) Wee: © OO GS 6! 6) 6B: (0 6 0 6: 6 O16. 6 1b. OO. 6:9. © 0:0 4) 0 O10. 56) 8).6 6. © 0 56) 0.6 (6) 8) S'S 6 6 618: 


isecond delay loop (approximately) 


The CALL is 19 clocks. 
The callers LOOP statement is 17 clocks. 
No flags affected. 


oo eee etree reer esr eer e ese eeeeeeeereeeseseeeseeeseereseseeeeseeresresesses 


proce near 
ex ; 11 clocks 
ex,374 ; 4 clocks 
w_one 3; (17 x CX) + 5 clocks 
ex ; 8 clocks 
3; 16 clocks 
endp 


s called by the timer_int routine when motor_count = 0 


Bi Lae a a OS. fe I eS IS SI Sk! BNW, SE Sw) (SO 616, 5S: 0 W). 0) 0) Ow: (© O'S) 01.0) 66:68 OPO 0: Oh: @ (OO: 16 A O01 ik “OLS: 


proc near 
al,OCh 

dx, f_motor_port 
dx, al 

endp 


Pe ee ee ee ee) 


none 
MSB of seek status is set if NEC interrupts. 
nothing 
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EF6B 


EF6B 
EF6C 
EF6E 
EF6E 
EFT1 
EF72 
EF74 
EF76 
EF78 
EF7D 
EF80 
EF80 
EF 81 


EF82 


EF82 


EF82 
EF85 
EF87 
EF8A 


EF8D 


51 
33 


BA 
EC 
A8 
15 
E2 
C6 
E9 


59 
c3 


E8 
BY 
E8 
E9 


66 
20 

8E 1E E5F2 R 
OE 003E R 80 


06 0041 R 80 
ECOB R 


03E8 


06 003E R 80 


06 0041 R 80 
EC9B R 


26 003E R 7F 
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ROM BIOS 
Listing 


ORG OEF57h 
fd_int proc near 
sti ; enable interrupts 
push ax 
push ds 
mov al, pic_seoi_6 ; specific end of interupt 
out pic_0,al ; send to 8259 
mov ds,word ptr cs:[set_ds_word] ; set DS to segment 40h 
or seek_status,80h ; interupt indicator 
pop ds 
pop ax 
iret 


Ce 


NEC ready (f_nec_rdy) 


’ 
; 
; 
; 
; INPUT: none 
; 
H OUTPUT: AL Main Status Register byte. 
; DX Points to port 3F4h 
; 
: DESTROYS: 
; 
FPFFTPT FFT I TTT T ITTF TTT TPT T TPIT TTT TFTA TTT ITTF TFT TTT T TTT T TTT T TTT TTT TTT TT TTT 
f_nec_rdy proc near 
push ex 
xor ex, cx 
f onri: 
mov dx,f_nec_status ; Main status register(3F4h) 
in al,dx 
test al,080h ; RQM 
jnz f_nr_ret ; NEC is ready. 
loop f_nri 
mov diskette_status, time_out 
jmp f_io_ret 3; Took too long to respond. 
f_nr_ret: 
pop ex 
ret 
f_nec_rdy endp 
DIFF F IFIP PIII FIIFIIITII TIT IF II PDI IFIIFIIFIIIII IDI TIIIFIFIFIFIFIIIISIS IIIT SSI IES 
’ 
: Sense Interrupt Status (f_sis). 
, 
H INPUT: none 
’ 
; OUTPUT: 
’ 
: DESTROYS: 
’ 
PIFP FPP T PPI PIPITITTIFT IITA DTT T TTT PTT FFT ITTF HATE TT TT TTT TTT TFFF TTT TT TTT Tea ee 
f_sis proc near 
call f_wait_for_nec ; no return on error, 
mov ah, f_snsint_cemd ; end of command phase. 
call f_put_byte ; no return on error. 
jmp f_get_byte 


f_sis endp 


Ce ee ee 


Wait for NEC to interupt on completion of execution phase or 
time out if NEC never interupts (f_wait_for_nec). 


INPUTS: none 
OUTPUTS: 
PUFA P PH FTI AIT T TFTA ET II AAA T AT AI DATA DIFF II IATA TAI TIA IIIII IIIT VIIIIIII TARR TTD IDD 
f_wait_for_nec proc near 
sti ; enable interupts 
push ex 
mov ex, 1000 ; wait a while 
w_nec: 
test seek_status, 80h ; test MSB (int_flag) 
jnz w_nec_ret 
call f_wait_one_ms 
loop w_nec 
nov diskette _status,time_out 
jmp f_ilo_ret 
w_nec_ret: 
and seek_status,07Fh ; clear MSB. 
pop ex 
ret 


f_wait_for_nec endp 
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ROM BIOS 
Listing 


EFAD 

EFAD 50 
EFAE E44 
EFBO 24 
EFB2 DO 
EFBY 30 
EFB7 79 
EFB9 A8& 
EFBB 75 
EFBD C6 
EFC2 E9 
EFC5 

EFCS 58 
EFC6 C3 
EFCT 

EFC? 

EFC7 

EFC7 

EFC? CF 
EFC8 02 
EFC9 25 
EFCA 02 
EFCB 08 
EFCC 2A 
EFCD FF 
EFCE 50 
EFCF F6 
EFDO 19 
EFD1 O04 
EFD2 

EFD2 

EFD2 
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C8 
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Oc 

80 

08 
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R 01 


AAAAAAGAAAHAAAAA AGA AAGDAAEGAHAESAABAGGAAGAAAAAGAGPAGDAANDAAaEAAAGAGANQ AAD ADAAAAG’AADAAAAHGAAAAAA AOOHAAABGAOaOAAROAADAAaGO AA AAAAaAeE aA 


eh Oey We a Oa, 0) 0) PO a Bye) ete fae OO AY 8) Ow © leo 18 0) 10) 18 18) Oh Oa Lk Co, Oe Oi Ow Oe JO (6 16 8 6 18 0 6.8 6 OO. CES Oe 6 88 Ke OK ee: 


Check Valid (f_check_valid) 


This routine determines the validity of the request based on 
drive type (40 or 80 trk) and media type (40 or 80 trk) 


Bit 7 of sys_conf_b port: O = 40 trk drive, 1 = 80 trk drive 
Bit 7 of head parameter(DH): O = 40 trk media, 1 = 80 trk media 
drive 
, oO f 4 | 
---|----------- | 
10 r/wiit r/w it 
media wo | ----------- | 
114 n/a it r/w fj 
w--|----------- | 
OUTPUT: The MSB of the drive parameter at bp+1 is set 


if the drive is 80 track and the media is 40 track. 
This is used by seek to determine if double stepping 
is necessary. 


fe ah a Te Wa) i OE me Zag ay WE WES) yw Sh Ay J) LB) Cae Of Hey we Beh WH) LW) We) (WW: .w: ©: 10) iu: fol La) Ih: RY Oy OY, O16! B16) SOE D0: 0) 1S! Te -0 G16 hi TH A 181 SO: 5G 1 16 YO: <6; 108 18: Cie: 86 
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f_check_ valid proc near 
push ax 
in al,sys_conf_b ; switch port 
and al, ; blow off high 7 bits 
ror al,1 ; move it into the high bit 
xor f_head,al ; head param. (xor clears carry) 
jns f_ev_ret ; media & drive agree 
test al,80h ; Is drive 80 track. 
jnz f_ev_ret ; It was. 
mov diskette_status,cmd_error 
jmp f_io_ret 
f_ev_ret: 
pop ax 
ret 
f_check_valid endp 
include fdu3.asm 
THREES EDS PP ARSE RAPP IPOD PEEP I RT ORI RAPD ERPI POS PILER ESP OPO IPP PS RTE LTE eS PS 
fd_parms 


They are pointed to by interrupt vector 1Eh (0:78h). To modify 


’ 

’ 

‘ This is the set of parameters required for diskette operation. 

’ 

: the parameters, build another parameter block and point disk_pointer 
’ 


to it. 
PIT F IPF T III I TTT I IIT TTP II IFIF IT ITIDIDIIIIIIIIIIDIFIIIIIISPIIIII IPOD DIDI IIE DD 
ORG OEFCTh 
fdu_data2 proc 
fd_parms label byte 
db (f_srt_48 shl 4) + f_hut ; SRT + HUT 
db (f_hlt shl 1) + f_ndma ; HLT + DMA mode 
db f_motor_wait ; motor off delay 
db 2 ; 512 bytes per sector 
db 8 ; EOT last sector on cyl 
db O2Ah ; gap length 
db OFFh ; DTL 
db 050h ; gap length for format 
db OF6h ; fill byte for format 
db 25 ; head settle time (ms) 
db 4 ; motor start time 
fdu_data2 endp 
code ends 


include prt.asm 


code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


INT 17h -- Printer Software Interrupt Request Routine 


’ 

’ 

: Input: ah = 0 print character 

4 al = character to print 

: dx = printer port number (0,1,2,3) 

; Output: ah = status of printer: bit #0 set if time out 
p al = character to print (preserved) 

; Input: ah = 1 initialize the printer port 

; dx = printer port number (0,1,2,3) 


Output: ah status of printer 


ROM BIOS 
Listing 


EFD2 


EFD2 


EFD2 


EFD3 
EFD6 


EFD8 
EFD9 
EFDA 
EFDB 


EFDD 
EFDE 


EFE3 
EFE5 
EFE7 
EFEB 
EFED 
EFEF 


EFF3 


EFF4 
EFF6 


EFF8 


EFFA 
EFFC 


EFFE 


EFFF 
F001 


F003 
F005 
F007 
F008 


F009 
FOOA 


FOOB 
FOOD 


83 FA 
13 32 


86 Cy 
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EE 
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Input: 
Output: 


Trash: 


Assumes: 


Qa 
tad 
nonwou 
Ls) 


& 
> 
" 


preserved 


read the printer status 


printer po 
status of 


(ah - 2) i 
preserved 


prt_stat_x 
prt_cemd_x 


time-out o 
set by sof 
no signifi 
hardware: 
hardware: 
hardware: 
hardware: 
hardware: 


90h & 10h 
30h if pri 


rt number (0,1,2,3) 
printer 


f ah > 2 


= prt_data_x + 1 = dx + 1 
= prt_data_x + 2 = dx + 2 


Printer Status Byte from prt_stat_x: 


n printing character (p_out). 
tware; no hardware significance. 
cance (always cleared). 

I/O error. 

selected. 

out of paper. 

acknowledge. 

not busy. 


if a printer is connected. 
nter is disconnected. 


ds:nothing, es:nothing, ss:nothing 
; enable interrupts 


; 4 printers allowed max 


es:code, ds:data, es:nothing, ss:nothing 


; Save registers 


reverse al & ah 


ds,word ptr cs:[set_ds_word] 


cl,byte ptr ds:[{di+printer_t_out] 


dx,word ptr ds:[{di+printer_addr] 


bit #0 = 
bits #1-2 = 
bit #3 == 
bit #4 = 
bit #5 = 
bit #6 = 
bit #7 = 
"Good" Statuses are: 
ORG OEFD2h 
p_io proc near 
assume cs:code, 
sti 
emp dx,4 
jae p_nop 
assume 
push ex 
push dx 
push di 
xchg al,ah 
push ds 
mov 
mov di,dx 
xor ex,ecx 
mov 
sal ex,1 
add di,di 
mov 
pop ds 
assume 
or dx,dx 
jz pret 
xor di,di 
or al,al 
jz p_out 
ine dx 
sub al,2 
jb p_init 
je p_stat 
p_ret: xchg al,ah 
pop di 
pop dx 
pop cx 
p_nop: iret 


assume 


p_out: mov 
out 


Input: 


Output: 


Trash: 


Assumes: 


ah 
ex 
dx 
di 
ah 
al 
dx 
ex 


[| 


es:code, 


al,ah 
dx, al 


es:code, d 


character 
printer ti 
address of 
0 

character 
status of 
address of 
destroyed. 


prt_stat_x 
prt_cemd_x 


ds:nothing, 


t) 
; ah saves al throughout 
; Save ds 

; Satisfy assumptions 
get port number (0-3) 
clear ch 

get printer time-out 
double it 4 faster cpu 
make word index 

get address of printer 
data port 

restore ds 


s:nothing, es:nothing, ss:nothing 


; is a printer there? 


; Clear di 

; al = 0? 

; dx = prt_data_x 
; dx =. prt statu x 
; al= 1 < 22 

; @x = prt_stat_x 
+ 2 = 27 

; dx = prt_stat_x 


> reverse al & ah back 
; ah saved al throughout 
; restore registers 


Print Character to Parallel Printer Interface. 


to print 
me-out 
printer data port (prt_data_x). 
to print 
printer: bit #0 set if time out 


printer status port (prt_stat_x). 


= prt_data_x +1 = 
= prt_data_x + 2 = dx + 2 


es:nothing, ss:nothing 


> wet character to print 
; Output character 


nnn rrr nnrrreeercee renee eres SS SSS SSS SSS SSS SSS SS SS SSS SS SSS 
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Listing 
c 
FOOE 42 c ine dx ; dx = prt_stat_x 
c 
FOOF EC Cc pulps: in al,dx ; get printer status 
FO1O 24 F8 c and al,OF8h ; clear bogus printer bits 
FO12 34 49 Cc xor al,O49h ; flip acknowledge & I/O err bit 
c ; & set printer time-out bit #0 
FO14 78 07 c js p_ok ; wait for not busy bit #7 set 
c 
FO16 4F Cc dec di ; inner loop counter 
FO17 75 F6 Cc jnz p_lp ; inner loop 
FO19 E2 F4 c loop p_lp ; outer loop 
FO1B EB E8 Cc jmp short p_ret ; return status with time-out 
Cc 
FOID 42 C p_ok: ine dx ; dx = prt_emd_x 
FO1E BO OD C mov al,ODh ; set strobe high (al = ODh) 
F020 EE Cc out dx,al 
Fo21 90 c nop 
Fo22 48 C dec ax ; set strobe low (al = OCh) 
F023 EE Cc out dx,al 
Fo24 4A Cc dec dx : dx = prt_stat_x 
Cc 
FO25 EB OD C jmp short p_stat 
c 
Cf rrr rrr 
Cc ; Initialize Parallel Printer Interface. 
Cc 3 
Cc ; Input: ah = byte to return in al. 
Cc 3 dx = address of printer status port (prt_stat_x). 
c f Output: al = Status of printer 
Cc . ax 2 address of printer status port (prt_stat_x). 
Cc ; Trash: ex = 0 destroyed. 
Cc 3 
Cc ; Assumes: prt_stat_x = prt_data_x + 1 = dx + 1 
Cc ; prt_cemd_x = prt_data_x + 2 = dx + 2 
Co fees eee s ee cee m ese me ses e nese ses eee see sn ses ansersemrsesssrcsss= 
Cc 
c assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
F027 BO 08 C p_init: mov al,08h ; request init (hold line low) 
F029 42 C ine dx ; dx = prt_emd_x i 
FO2A EE Cc out dx,al 
c 
FO2B B5 05 Cc mov eh,05h ; delay awhile (cx = 05??h) 
FO2D E2 FE Cc loop $ 
Cc 
FO2F BO OC Cc mov al,OCh ; disable interupts, manual lf 
F031 EE c out dx, al ; (init done - line set high) 
F032 90 c nop 
c 
FO33 4A c dec dx ; dx = prt_stat_x 
Cc 3 jmp short p_stat ; fall through 
c 
Cc Se 
C ; Read Status of Parallel Printer Interface. 
Cc 3 
Cc 3 Input: dx = address of printer status port (prt_stat_x). 
Cc 3 
c : Output: al = status of printer 
Cc . dx = address of printer status port (prt_stat_x). 
Cc 3 
Cc ; Assumes: prt_stat_x = prt_data_x + 1 = dx + 1 
Cc J rrr cccan 
c 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
FO34 EC Cc 6pstat: in al,dx ; get printer status 
FO35 24 F8 Cc and al,OF8h ; clear bogus printer bits 
F037 34 48 c xor al,O48h ; flip acknowledge & I/O err bit 
FO39 EB CA Cc jmp short p_ret ; exit 
c 
FO3B C p_io endp 
Cc 
FO3B C code ends 
C include vid.asm 
c 
Cc pTS SSS SSS SSS SS SSS SSS SSS SSS SS SSS SSS SSS SHS SSS SSS SSsSSSSSSSSSerssresseresszsze 
G 4 Filename: vid.sre 
Cc 
Cc : This module includes INT 10h, the display routines. 
Cc 3 
(e pT SSS SSS SSS SS SS SSS SSS SSS SSS SSS SSS SSS SSSS SSS SSS SSS SS SS SSS SSS SSSSTSTssssset 
Cc 
Cc ; These constants must be defined (amount to scroll/clear during vert retrace): 
= 0004 Cc V_KSCROLL equ 4 ; 4 rows, plus 
= 0007 Cc V_KCLEAR equ 7 
c 
FO3B C code segment public 'ROM' 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
c 
c pr ee eee 
@ ¢§ ROM data 
c pr rr nnn ee ee 
c 
FO4S c ORG OFO4Sh 
c 
FO45 C v_datal proc near 
c 
FO45 FOFC R Cc v_tbl dw v_set_mode ; ah = OOh 
FO47T F1E9 R c dw v_curs_type ; ah = Oth 


8-134 


FO4Q 
FO4B 
FO4D 
FO4F 
F051 
F053 
F055 
F057 
F059 
FO5B 
FO5D 
FOSF 
F061 
F063 


F065 


FIFT7 
F215 
D7CD 
F22C 
F27F 
F35B 
F37C 
F3A6 
F3DF 
F4IA 
DTEA 
D7DO 
F446 
FUCF 


(ad 


2E: 


aZawmwwmwwwvw www www Dy 


FC OF 
38 


8E 1E ES5F2 R 


C7 F800 


26 0049 R 
E8 


FF 95 FO45 R 
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ROM BIOS 
Listing 


dw v_curs_ pos >; ah = 02h 
dw v_r_curs_pos ; &@h = 03h 
dw erf_light_pen ; ah = O4h (see graph. src) 
dw v_page ; ah = 05h 
dw v_scrl_up ; ah = 06h 
dw v_scrl_dn ; ah = O7h 
dw v_rac ; ah = 08h 
dw v_wac > ah = O9h 
dw v_we >; ah = OAh 
dw v_col ; ah = OBh 
dw erf_write_dot ; ah = OCh (see graph.src) 
dw grf_read_ dot ; ah = ODh (see graph.src) 
dw v_terminal ; ah = OEh 
dw v_stat >; ah = OFh 
v_datal endp 
pT SSO S SSS SSS SSS SSS SSSr SSS SSS ssssstssttssssssssstsssstttttstsssstsszteste: 
; INT 10h -- Video Interrupt Service Routine. 
pES SSS SSS SSS SS SSS SSS SSS SSS SSS SSS Ses sess ss Seeessssssrsssssssesssesezeeeee 
. -- Set CPU flags. 
; -- Segment registers properly loaded. 
; -- CALLs routines with: -- al, bx, ex, dx intact 
: -- ah = v_mode 
; -- si = 2 ® (function that was in ah) 
; -- di = bits #4 & 5 of switch_bits 
; -- bp = value of ax to be returned 
; 
: Input ah = function number (00h <= ah <= OFh) 
, 
. Trash None. (bp, si, di, ds, & es if ROM stack) 
pT STS SSssssssssssssssssssssssessssstststeeesseeeesss tts stseeeteeeeeete 
ORG OFO65h 
v_io proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
sti ; enable interrupts 
cmp ah,OFh ; input out of range? 
ja v_nop 
push es ; Save 'trashable' registers 
push ds 
mov ds,word ptr cs:[set_ds_word] ; avoid potential stack problems 
push di 
push si 
push bp 
assume cs:code, ds:data, es:nothing, ss:nothing 
push ax ; Save ax 
mov al,ah ; al = function number 
add al,ah 7 @ 2 
c bw 
push ax ; save for CALL later. 
mov di,para_graph ; get screen segment .. 
mov al,byte ptr ds:[switch_bits] ; «- check switch bits 
test al,20h 
iz v_colour 3; .. if either is 0, it's 
test al,10h 5 ». Color display board 
jz: v_colour 
add di, para_mono-para_graph ; ». it's a monochrome board 
v_colour: 
mov es, di ; set es = video ram 
pop di ; Get index to call table. 
pop ax ; restore ax 
mov ah, byte ptr ds:[v_mode] ; get display driver mode 
mov bp,ax » bp saves ax throughout 
; (return ah = v_mode 
; unless specific ret. value) 
eld ; String ops move UP, mostly. 
eall es:(di+(offset v_tbl)] ; perform display function 
pop bp ; restore 'trashed' registers 
pop si ; (destroyed if ROM stack) 
pop di 
pop ds 
pop es 
v_nop: 
iret 
v_io endp 
pESSSSSSS SSS SS SSS SS SSS SSS SSS SSS ss SSSsSssSssesessssssesssesessserszssssee 
ORG OFOA4h 
v_data2 proc near 
v_parms label byte 


; 6845 Parameters except register 3h (Horizontal Synch Width). 


nner errr SSS SSS SSS SSS SSS SSS SSS 
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SAE A SE ZA TIERS TOS OTE NATE ET ELS SBE RIEDEL ALLELE TLE LEE IE ELLE EEE DEEL LEE DE LLL 


FOA4 38 28 2D 06 Cc v_md_40 db 38h,28h,2Dh,06h ; text 40 x 25 
FOA8 1F 06 19 1C c db 1Fh,06h,19h,1Ch ; mode O -> monochrome 
FOAC 02 07 06 07 Cc db 02h,07h,06h,07h ; mode 1 -> color 
FOBO 00 00 00 00 c db 00h,00h,00h,00h 
Cc 
FOB4 71 50 5A 0C C v_md_80 db 71h,50h,5Ah,0Ch ; text 80 x 25 
FOB8 1F 06 19 1C c db 1Fh,06h,19h,1Ch ; mode 2 -> monochrome 
FOBC 02 O07 06 07 C db 02h,07h,06h,07h ; mode 3 -> color 
FOCO 00 00 00 00 Cc db 00h,00h,00h,00h 
Cc 
FOC4 38 28 2D 06 C v_md_graph db 38h,28h,2Dh,06h ; graphics 
FOC8 7F 06 64 70 c db 7Fh,06h,64h,70h ; mode 4 -> 320 x 200 color 
FOCC 02 01 06 07 Cc db 02h,01h,06h,07h ; mode 5 -> 320 x 200 monochrome 
FODO 00 00 00 00 Cc db 00h,00h,00h,00h ; mode 6 -> 640 x 200 monochrome 
Cc 
FOD4 61 50 52 OF C v_md_mono db 61h,50h,52h,0Fh ; monochrome card 80 x 25 
FOD8 19 06 19 19 c db 19h,06h,19h,19h ; mode 7 -> monochrome card 
FODC 02 OD OB OC Cc db 02h,0Dh,0Bh,0Ch ; 
FOEO 00 00 00 00 Cc db 00h,00h,00h,00h 
Cc -list 
Cc 
FOE4 0800 C v_md_len dw 2048 ; 40x25 modes 0 & 1 
FOE6 1000 c dw 4096 ; 80x25 modes 2 & 3 
FOE8 4000 c dw 16384 ; graphics modes 4 & 5 
FOEA 4000 c dw 16384 ; mode 6 
C j;only in 1050 dw 32768 : modes 64 & 72 
Cc 
FOEC 28 Cc v_md_wid db 40 ; O -> text 4Ox 25 monochrome 
FOED 28 c db 40 ; 1 -> text 40x 25 color 
FOEE 50 Cc db 80 ; 2 -> text 80x 25 monochrome 
FOEF 50 c db 80 ; 3 => text 80x 25 color 
FOFO 28 (J db 40 ; 4 -> graphics 320x200 color 
FOF1 28 le; db 40 ; 5 -> graphies 320x200 monochrome 
FOF2 50 c db 80 ; 6 -> graphics 640x200 monochrome 
FOF3 50 c db 80 ; 7 -> text 80x 25 monochrome card 
Cc .list 
FOF4 2c C v_md_enable db 2Ch ; 0 -> text 40x 25 monochrome 
FOF5 28 Cc db 28h ; 1 => text 40x 25 color 
FOF6 2D G db 2Dh ; 2 => text 80x 25 monochrome 
FOF7 29 Cc db 29h ; 3 -> text 80x 25 color 
FOF8 2A Cc db 2Ah ; 4 -> graphics 320x200 color 
FOF9 2E c db 2Eh ; 5 -> graphics 320x200 monochrome 
FOFA 1E c db 1Eh ; 6 -> graphics 640x200 monochrome 
FOFB 29 C db 29h ; 7 => text 80x 25 monochrome card 
c 6.1list 
FOFC C v_data2 endp 
c 
C PSSST SSS SSS SSS SSS SS SSS SSS SSS SSS SSS SS SSS SSS SSS SSS SSS SSS SSS SSS SSS STTTTTse 
Cc 
CC penn nn ne en nr rr rrr 
Cc : Set Mode & Clear Screen ah = 00h 
Cc 3 
c H Input: al = mode = 0 => text 40x 25 monochrome 
C- = 1 -> text 40x 25 color 
C. & = 2 -> text 80x 25 monochrome 
c 3 = 3 -> text 80x 25 color 
Cc 3 = 4 -> graphics 320x200 color 
Cc 4 = 5 -> graphics 320x200 monochrome 
Cc 4 = 6 -> graphics 640x200 monochrome 
Cc ; = 7 -> text 80x 25 monochrome card 
c = 64 -> graphics 640x400 monochrome 
C. 3 = 72 -> graphics 640x400 monochrome tinytext 
Cc 
Cc +H Output: ah = 00h 
c H al = v_colorpal 
Cc 35 
Gs Assume: contents of v_base6845 = pointer register (3D4h) 
G 3 (eontents of v_base6845)+1 = data register (3D5h) 
G3 (contents of v_base6845)+4 = mode control register (3D8h) 
c % (contents of v_base6845)+5 = overscan register (3D9h) 
G + (eontents of v_base6845)+6 = status register (3DAh) 
€ 3 (contents of v_base6845)+10 = mode control register #2 (3DEh) 
Cc 5 
Cc Trash: si & di destroyed. 
CC pee nee enn en nn nn rrr 
Cc 
FOFC C v_set_mode proc near 
c 
c assume ecs:code, ds:data, es:v_ram, ss:nothing 
c 
FOFC 52 Cc push dx ; save dx 
FOFD 51 Cc push ex 3; save cx 
Cc 
Cc ; Get Color/Monochrome dependent stuff. 
Cc 
FOFE 32 E4 Cc xor ah,ah ; AH = mode ctrl., color board 
F100 BA 03D4 Cc mov dx,color_pointer ; color 6845 pointer register. 
c 
F103 F6 06 0010 R 10 Cc test byte ptr ds:[switch_bits],10h ; monochrome board? 
F108 74 OD Cc jz v_set_mode_color ; if not, skip monochrome stuff. 
F10A F6 06 0010 R 20 (63 test byte ptr ds:[switch_bits],20h 
FIOF 74 06 c jz v_set_mode_color 
Cc ; It's a monochrome board, so.. 
Fi11 B8 0107 c mov ax,0107h ; (AH, AL) = (overwrite mode 
c ; for monochrome, mono. mode) 
Fi14 83 C2 EO c add dx,v_pointer-color_pointer; monochrome pointer register. 
c 
F117 C v_set_mode_ color: 
c 
C ; Save CRT Mode & 6845 address, and reset display monitor with mode control. 


C 


F129 


FI2A 
F12C 
FI2E 


Fy 32 
FL 5 
Fi37 
Fi39 
F13B 
F13D 
F13F 
F144 
F143 
F145 


FIAT 
FIAT 


F149 
F14B 
FI4c 
F14D 
FI4E 
FI4F 
F150 


Fl 5:2 


FI53 
F155 
F157 


F159 


F15C 
FI5E 
F160 
F162 
F164 
F166 
F168 
F168 
F16A 


F16C 
Fi6C 
FI6E 
FI6E 
FAT 1 
F171 
F173 


1E 


33 
8E 
C5 


0049 R 
16 0063 R 


10 


fe) 
=e 


F5 


cy 
EY 
FO 


AAAAAMVAAAANANAAAAUAAAANADAAAAAAAANANDAARAANANAAANAADAAARAAAANAANAANAANAAADAAAAAAANAAANRAADAAAADAAAADAAAADARAANAAADAAAADARARAAaAaaaAaaAaaAAAAaA 


’ 


mov 
mov 
xchg 
add 
out 
sub 
mov 


byte ptr ds:[v_mode],al ; 


ah,al 
dx,4 
dx,al 
dx,4 
al,ah 


Get pointer to display parameters, 


push 


xor 
mov 
lds 


ds 
assume cs:code, ds:abs0, 


si, si 
ds, si 


rT 
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save mode. 
word ptr ds:({v_base6845],dx 


save 6845 pointer register. 
AH=mode, AL=mode ctrl. 

get 6845 mode control register 
reset display 

restore 6845 address. 

restore mode in al 


save ds = data_seg 


es:v_ram, ss:nothing 


si,dword ptr ds:[int1Dlocn] ; 


ds:si in effect points to cs:v_parms. 


Determine which set of parameters to use from 


assume cs:code, ds:code, 


eX, 16 

al 32 
v_set_mode_lp 
B44 0% 

al,4 
v_set_mode_lp 
si,ox 

al, 7 
v_set_mode_lp 
si,¢cx 


satisfy assumptions 
display parameter pointer 


es:v_ram, ss:nothing 


’ 
’ 
’ 
’ 
’ 
’ 
’ 
’ 
’ 
’ 


mode, 


count of parameters 

40x25 mode? (0 & 1?) 

if so, we're done 

next set of parameters 

80x25 mode? (2 & 37) 

if so, we're done 

next set of parameters 
graphics mode? (4,5,6,64,72?) 
if so, we're done 

else, monochrome card (7) 


; Loop through 6845 initialization table outputting register number and data 


Vin 


set_mode_ lp: 
mov 


sub 
out 
ine 
lodsb 
out 
dec 
loop 


v_set_mode_lp 


assume cs:code, ds:data, 
ds 
al,ah 


ah,ah 
S1,,ax 


Clear the screen. 


ex,2000h 


al,4 

v_md_olr_8k 

al,7 

v_md_clr_2k 
v_md_clr_graphics 
ex, 1 


v_md_clr_graphics: 


Vis 


Ves 


1 a 


. 


Vv 


xor 
jmp 


md_clr_2k: 
mov 

md_clr_8k: 
mov 

md_clr: 
xor 
rep 


ax,ax 
short v_md_celr 


ch,08h 
ax,(7#100h)+4(' ') 


di,di 
stosw 


Set mode control register #2 


’ 
, 
’ 
? 
’ 
. 
’ 
ti 


Handle underline on shades~of-gray monitor. 


add 
in 

and 
shl 
shl 


Handle double 
emp 
jb 


ine 
mov 


md_dbl: 


dx,6 
al,dx 
al,010h 
al,1 
al,1 


scan line modes 64 & 72. 


si,64 
v_md_dbl 
ax 

si,6 


wee we wee we Be 


wee wee we we we we 


get 6845 register number = 
= (16 - cl) (unscrambled) 


output to register port 

point to 6845 data register 
get parm value: al gets ds:si 
output to data port 

point back to pointer register 
next register 

dx = pointer register 


es:v_ram, ss:nothing 


restore ds = data_seg 


save mode in ah & al 
ax = mode 
si = mode hence... 


assume 8k words to clear 


40x25 or 80x25 text modes 0-37 

if so, clear 8k words. 

monochrome card mode 7? 

if so, clear 2k words. 

graphics mode 4-6 clear 8k wds 
mode 64 & 72 clear 16k wds 


graphics mode 
clear screen with zeroes 


ex = 0800h 


clear with attribute & space 


es:di gets ax 


dx = pointer register 

get 6845 status register 
get CRT status 

isolate color/shades bit #4 
move it to underline bit #6 


dx = 6845 status register 

modes 0 through 7? 

if so, single scan line mode 

else mode 64 or 72, set bit #0 

modes 64 & 72 look like mode 6 
from now on 


double scan line mode. 
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F188 
F18B 


F18C 
F191 


F194 
F197 


F198 
FI9A 
FI9OF 


Fi1A2 
F1A6 
F1AB 


FIAE 
F1B0 
F1B4 
F1B7 


F1B9 


F1BB 
FIBE 


F1C0 


F1C4 
F1c4 


F1C6 
F1C6 
F1C9 
FICA 


F1CB 
F1CC 


F1CcD 
F1D0 
F1D3 
F1D5 


F1D7 
F1DA 
F1iDD 


F1E3 
F1E6 
F1E7 
F1E8 


F1E9 


F1E9 


F1E9 
FIED 


FIEF 
FIF1 


FIF4 
F1F6 
FIFT7 


83 
EE 


D1 


BO 


A2 
42 
EE 


1E 
07 


BF 
B9 
33 


c2 04 


8A 84 FOF4 R 
0065 R 


EA 06 


co 
8A 84 FOEC R 
OO4A R 


E6 OOOE 
8B 84 FOE4 R 


OO4C R 


FC 40 


26 OO4C R 


3F 


0066 R 


0050 R 
0008 
co 


F3/ AB 


A3 
A2 
C7 


AO 
59 
5A 
C3 


89 
8B 


BY 
E8 


8A 
C3 
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OO4E R 
0062 R 
06 0060 R 0607 


0066 R 


OE 0060 R 
F9 


OA 
F262 R 


C1 


AAAQVDAAGAAGAAANAAAANAAAAAAAAAAAVAAAADAAAAANAAARAAAADNANAKRAAAANDAAANAADARAARAARAAMAAAAANQAAAAAADAAARAANAAANRAANAAAANAANAAAAAaaaaa 


. 
id 


’ 


add dx,4 ; get mode control register #2 


out dx, al 


Enable display monitor with mode control. 


mov al,byte ptr cs:[si+v_md_enable] 
mov byte ptr ds:[v_3x8],al ; save the value for later 

; dx = mode control register #2 
sub dx,6 ; get 6845 mode control register 
out dx, al ; enable display 


Determine width & length of screen, 


xor ax, ax ; clear ah 

mov al, byte ptr cs:[si+v_md_wid] 

mov word ptr ds:[v_width],ax 

and si,OEh ; make word index divided by 2 
mov ax,word ptr cs:[{si+v_md_len] 

mov word ptr ds:[v_height],ax 


Set up overscan register & v_colorpal. 


mov al ,030h ; v_colorpal for modes 0-5 & 7 
mov ah, byte ptr ds:[v_mode] ; retrieve v_mode 
emp ah,6 ; modes 0-5 ? 
jb v_ovr_ok ; if so, we're ok. 
je v_ovr_not_ok ; 640x200 graphics mode 6 ? 
; if so, change v_colorpal 
cmp ah,64 ; 640x400 graphics mode 64, 72 ? 
jb v_ovr_ok ; if not, we're ok. 


; if so we set v_height wrong, 


shl word ptr ds:[{v_height],1 ; double v_height from 16k to 32k 
v_ovr_not_ok: 

mov al,03Fh ; v_colorpal for modes 6,64,72 
v_ovr_ok: ; dx = 6845 mode control register 

mov byte ptr ds:({v_colorpal],al ; save the value for later 

ine dx ; wet 6845 overscan register 

out dx,al 


Clear all cursor positions. 


assume cs:code, ds:data, es:data, ss:nothing 


push ds > set es = firmware data area 
pop es 
mov di,ds:(offset v_curpos) ; get address [defined by DB] 
mov ex,8 
xor ax, ax ; ax = 0 
rep stosw ; es:di gets ax = 0 
; Clear other firmware data variables (ax = 0). 
mov word ptr ds:[v_top],ax ; set starting offset to 0 
mov byte ptr ds:[v_apage],al ; set current active page to 0 
mov word ptr ds:[{v_cursize],0607h ; set cursor mode 
; Clean up. 
mov al,byte ptr ds:[v_colorpal] 
pop cx ; restore cx 
pop dx > restore dx 
ret 
v_set_mode endp 
’ wwrnr rrr eee em ee em meme em em em mem we em wm em meme mmm wm mmm mm em mem wwe mmm mmm mm mem wm mem wee w ee meee oe 
: Set Cursor Value ah = O1h 
; 
4 Input: ch = bits #0-4 = starting line for cursor 
: el = bits #0-4 = ending line for cursor 
; Output: ah = 10 
; al = el 
; 
; 


Trash: si & di destroyed. (si = dx; di = ex) 


v_curs_type proc near 


’ 

call v_6845 ; set cursor; ah 6845 gets cx 
; si = dx destroyed 
; ah = preserved = 10; al = 
; di restores cx 

mov al,cl ; restore al with original cl 

ret 

v_curs_type endp 


assume cs:code, ds:data, es:v_ram, ss:nothing 


mov word ptr ds:[v_cursize],cx ; save the cursor value 
mov di,cx ; di saves cx 
mov ah,10 6845 cursor set register = 


10 


FIFT7 


FIF7 


FES 
F1FB 
FIFD 
F201 


F203 


F207 
F20B 


F20D 
F2O0F 


F210 
F210 
F212 


F215 


F215 


F205 
F217 
F219 
F21B 
F20F 
F221 
F225 
F227 
F22B 


F22C 


F22C 


8B 


8A 
8B 
81 
03 


89 


3A 
74 


8B 
C3 


8B 
EB 


F9 


Fi 

E6 0007 
F6 

94 0050 R 


3E 0062 R 
03 


CF 


C2 
42 90 


OE 0060 R 


0007 


c 
Cc 
Cc 
Cc 
c 
Cc 
c 
Cc 
C 
Cc 
Cc 
c 
c 
C 
c 
c 
Cc 
Cc 
C 
C 
C 
cc 
c 
C 
c 
Cc 
Cc 
Cc 
C 
Cc 
C 
Cc 
Cc 
C 
C 
c 
c 
C 
Cc 
Cc 
C 
c 
C 
c 
Cc 
c 
C 
Cc 
c 
C 
Cc 
C 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
Cc 
c 
C 
Cc 
c 
c 
c 
c 
c 
Cc 
c 
C 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
c 
C 
C 
c 
c 
c 
c 
Cc 
c 
Cc 
c 
c 
c 
c 


. Set Cursor Position ah = 
, 

; Input: bh = page number (0-7) 
; (dh,dl) = 

; Output: if bh = v_apage, ah = 
; al = 
. else, ah = 
‘ al = 
’ 

; Trash si & di destroyed. (si = dx, 


v_curs_pos 
assume 
mov 
mov 
mov 
and 
add 


mov 


cmp 


je 


mov 
ret 


v_set_curs: 
MOV 
jmp 


cs:code, ds:data, es:v_ranm, 
di,cx 

el, bh 

si,cx 

si,7 

si,si 


word ptr ds:[si+v_curpos],dx 


bh, byte ptr ds:[v_apage] 
v_set_curs 


ex, di 


ax,dx 
v_set_cur_pos 


o2h 


14 
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(row,col) of current cursor from (0,0) 


low byte of cursor position 
v_mode 
preserved 


di = ex) 
ss:nothing 
; save ex 


mask to 8 pages 
#2 => word index 


save the cursor position 


if active page, put the cursor 
on the screen, 
not active page, so just 
restore cx 

and exit 


active page, so set cursor.. 
ax gets cursor position 
set cursor; ah 6845 gets cx 
si = dx destroyed 
ah = preserved = 14 
= low byte of cursor posn 


al 
v_curs_pos endp 
; Read Cursor ah = 03h 
; 
‘ Input: bh = page number (0-7) 
F Output: (dh,dl) = (row,col) of current cursor from (0,0) 
; (ch,cl) = current cursor mode setting 
; ax = dix 
, 
H Trash None. 
’ SEES LG SS eS ee a a a ea ew ge fe enw i | ents (a (0 ao a mej ins cs ms) st cos cs es Le (ew a 
v_r_curs_pos proc near 
assume cs:code, ds:data, es:v_ram, ss:nothing 
mov ax,dx 
mov ex, bx ; Save bx 
mov bl, bh 
and bx,O07h ; Page number mod 8 
shl bx,1 ; page number mod 8 word index 
mov dx,word ptr ds:[(bx+v_curpos] 
mov bx,cx ; restore bx 
nov ex,word ptr ds:[v_cursize] 
ret 


v_r_curs_pos 


; Read Light Pen (see graph.sre) ah = O4h 

; Set Active Display Page ah = 05h 

. Input: al = new page number (0-7 for modes 0-1; 0-3 for 2-3) 
; Output: 6845 is reset to display the new active page 

; ah = 14 

; al = low byte of cursor position 

; 

; 


v_page proc 
assume 


and 
mov 


mov 


jz 


mov 
mul 
mov 


v_page_0: 
mov 
sar 


es:code, ds:data, es:v_ran, 


byte ptr ds:[v_apage],al 
v_page_0 


di,dx 
word ptr ds:[v_height] 
dx, di 


word ptr ds:[v_top],ax 
ax, 


we we 


ss:nothing 


page number mod 8 
save ax = page number mod 8 


save active page number (0-7) 
page number = 0? 


save dx 
dx:ax = (page number) *v_height 
restore dx 


save starting address of page 
divide by 2 for byte count 


ener eee SS SSS SSS 
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F262 


F262 
F264 
F267 
F269 
F26B 
F26E 
F270 
F272 
F273 


F273 


F273 
FeTT 
F279 


F27A 
F27B 
F27D 
F27E 


F27F 


F27F 


F27F 
F282 
F284 
F287 


8B 84 0050 R 


E8 F52B R 
03 06 OO4E R 
D1 F8 


B5 OF 


8B F2 

E8 F273 R 
FE C4 

8A EQ 

E8 F273 R 
8B D6 

8B CF 

C3 


8B 16 0063 R 
8A C4 
EE 


E8 F53C R 
T2 03 
E9 D874 R 


AADANAAQA RAAMADAAMAARAANAANRAANAANAANANNDAANDAANRDAAANANAND A ANDANADANANAADAANAANAANANAAAANRAARANANANANAANANANANAMA AMA ANAANAANAANANANANNANANNANAANNNAAMAAMAAaAANANANANAAnNaNnNnaAaNnaanaanaaaaaa 


mov 
shl 
mov 
mov 


v_set_cur_pos: 


eall 
add 
sar 


mov 
xchg 


Now: ah 
ch 
el 
di 


v_6845: 


Assume: 
’ 
’ 
‘ Output: 
’ 
’ 


v_out_byte 


di,cx ; save cx 
Cx, ax ; ex gets offset of active page 
ah,12 ; 6845 cursor set address = 12 
v_6845 ; set cursor; ah 6845 gets cx 
; si = dx destroyed 
; ah = preserved = 12; al = el 
; di restores cx 
ax, bp ; restore ax = page number mod 8 
ax,1 ; page number mod 8 word index 
si,ax 
ax,word ptr ds:[si+v_curpos] ; get page's cursor position 
;(ah,al) = (row,col) cursor pos. 
$) dd = value to return in cx 
v_posn ; (ah,al) -> ax offset; si trash 
ax,word ptr ds:[v_top] ; add offset of active page 
ax,1 ; divide by 2 for byte count 
eh,14 ; 6845 cursor pos register = 14 
ex,ax 


6845 register selection 

first data byte to (ah) 6845 internal register 
second data byte to (ah+1) 6845 internal register 
value to return in cx 


; program 6845 cursor: 


si,dx ; save dx 

v_out_byte 3 output to 6845 

ah ; next 6845 register 
ch,cl ; get the register input 
v_out_byte ; output to 6845 

dx, si ; restore dx value 

ex, di ; set up return value 


two byte to the selected 6845 registers 


ah = 6845 register selection 

ch = first data byte to (ah) 6845 internal register 

el = second data byte to (ah+1) 6845 internal register 
di = value to return in cx 

contents of v_base6845 = pointer register 

(contents of v_base6845)+1 = data register 

ah = 6845 register selection 

al = second data byte 

ex = di 

proc near 


assume cs:code, ds:data, es:v_ram, ss:nothing 
mov dx,word ptr ds:[v_base6845] ; wet 6845 pointer register 
mov al,ah 3; get the register address 
out dx,al ; select the data register 
ine dx ; next register 
mov al,ch ; wet second data byte 
out dx, al ; output a data byte to 6845 
ret 

v_out_byte endp 

; awe ewe ee we ee ee ee ee eee OE ee we eO ee eR Oe ee eee we ee ee ee ee eee ee eee eee eee eee eee 

4 Scroll Active Page Up ah = 06h 

’ 

: Input: if al = 0, then clear entire window with attribute in bh 

: else, al = number of rows to “scroll' up 

; = number of rows to clear at bottom of window 

; bh = attribute to be used on blank row(s) 

; (eh,cl) = (row,col) of upper left corner of window from (0,0) 

; (dh,dl) = (row,col) of lower right corner of window from (0,0) 

; Output: ah = attribute to be used on blank row(s) 

H if v_mode = 7, al = 20h = space 

; else al = v_3x8 

’ 

; Assume: (contents of v_base6845)+6 = status register 

’ 

H Trash bp, si, & di destroyed. (bx thru dx destroyed if ROM stack) 


proc near 


assume cs:code, ds:data, es:v_ram, ss:nothing 


v_txt_md ; all registers preserved 
v_txt_up 
gerf_graphics_up ; jump if graphics 
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F287 
F288 
F289 


F28A 
F28C 
F28E 
F291 


F293 


F295 
F295 


e977 
F29C 


F29E 


F2A0 
F2A0 
F2A1 
F2A5 


F2A8 
F2A9 


FOAA 
FOAA 
F2 AB 
F2AD 


F2AF 
F2B0 
F2BO 
F2B1 
F2B3 


F2B5 


F2B6 


E8 FADE R 


80 3E 0049 R O07 
TH 49 


8B 16 0063 R 
83 C2 06 


DO D8 
T2 FB 


DO D8 
73 FB 


BA 0040 


FE CC 
TH 2C 


A8 08 
74 16 


EEE ELE REELED SLA ALAA OCHS ROR SAE AON he Aenea ease ea eae naa aeaea ease tea aasaws 


push dx ; 
push ex 

push bx 

mov bl,al ; 
mov ax,cx : 
call v_scrl_pos : 
a2 v_clr_bot ‘ 


; Seroll cl rows up. 


;V_MV_up: 
add si,ax ; 


’ 


ROM BIOS 
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save registers 


save line count 

pass upper left coordinates.... 

to common scroll positioning routine 
clear rows if nothing to move 


add (bytes/row)*®(rows to scroll) to 
“from' address for scroll 


; Scroll cl rows up/down (based on bp & direction flag DF). 


V_mv: 
mov ah,cl ; 
cmp byte ptr ds:[(v_mode],7 
je v_mv_flp : 
mov CL, dl ; 

v_mv_lp: 
push dx 
mov dx,word ptr ds:[v_base684 
add dx,6 

assume 
push es ; 
pop ds ; 


Wait for horizontal retrace... 


v_mv_hi: 
in al,dx ; 
rer al,1 ; 
ie v_mv_hi ; 
; 
eli ’ 
¥VIeopVv_1 6:3 
in al,dx ; 
ror al,1 ; 
jne v_mv_lo A 
wlist 
MOV Sw ; 
; Worst case: (8+2+16)+(8+24+4)+(18) = 58 
in al,dx H 
assume cs:code, ds:data, 
mov dx,data_seg ; 
mov ds,dx ; 
pop dx ; 
dec Cx ; 
jnz v_mv_nxt ; 
add si,bp H 
; 
, 
add di, bp ; 
; 
; 
dec ah : 
jz v_mv_end ; 
mov cl,dl ; 


ah gets number of rows to move = el 


jump to fast loop 
no. of columns to move up/down per row 
; save dx 


5] ; get 6845 pointer register 
; get 6845 status register 


es:code, ds:v_ram, es:v_ram, ss:nothing 


satisfy assumptions 
ds gets es 


get CRT status 

test display enable (bit #0) 

wait for display enable low (cf) 
interupts are disabled .. 

disable now 

08 get CRT status 

02 test display enable (bit #0) 
16/04 wait for display enable hi (cf) 
18 move word (es:di gets ds:si) 
cycles = 72.5% of 80 cycles 

08 get CRT status (vert synch slow) 


esiv_ram, ss:nothing 


o4 satisfy assumptions 

02 

08 restore dx 

03 decrement columns to move 


04/16 did we move the last column? 


03 add/subtract number of bytes 
to skip in row to/from ‘from! 
address for scroll up/down 

03 add/subtract number of bytes 
to skip in row to/from ‘to! 
address for scroll up/down 


03 decrement rows to move 
4/16 did we move the last row? 


02 number of columns to move 
up/down per row 


; Worst case: [58]+(8+4+2+8)+(3+4)+(3+3)+(3+44+2) = 102 cycles = 12.75 usec 


vV_mv_nxt: 
sti : 
test al,08h : 
jz vV_mv_past ; 


enable interrupts immediately 
04 check for vertical retrace 
16/04 jump past vertical retrace code 


; We get here if vertical retrace has started... 


mov al, V_KSCROLL ; 

; 
v_mv_row: 

push ds 

push es 

pop ds 

rep MOV sw , 

pap ds 

add si,bp H 


NOTE: interrupts disabled for 1.1ms! 
O4 at most V_KSCROLL rows per 
vertical retrace ... 


11+17#80 move row (es:di gets es:si) 


03 add/subtract number of bytes 


er Ey 
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F2D9 


F2DB 
F2DD 


F2DF 


F2E1 
F2E3 


F2E5 
F2E5 


F2E7 
F2E7 
F2E9 
F2EC 
F2EE 


F2F0 
F2F2 


F2F4 
F2F4 


F2F5 


F2F5 


F2F5 
F2F7 
F2FC 


F2FE 


F300 
F300 


F302 
F303 
F307 


F30A 
F30A 
F30B 
F30D 
F30F 


F310 
F310 
F311 
F313 
F315 


F317 


F318 
F319 


F31A 
F31B 


F31D 


F31F 
F321 


F323 


F325 


F325 
F326 


03 


EB 


8A 


FD 


cc 
15 


CA 


c8 
EC 


B9 


CA 


F3/ 26: A5 


03 
03 


FE 
75 


FB 


FB 
A8 
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F5 
FD 


cc 
E3 


E7 
3E 
44 


CA 


20 


16 
C2 


D8 
FB 


D8 
FB 


C7 


08 


FD 


CB 
28 


CA 


08 


0049 R O7 


0063 R 
06 


AAARAAANANAANANAANAAARAAANRDAANAANAANANANAAANAAANDNANAANAAARAARANNMQAANQANMNAMNAANAANAAANANAANAANANNAANANANANAANANANANAANANAANAAANNAANANAANANAANAANAANANANANAANNQANQNAANAANAAAANNAAAA 


add 


dec 


jz 
mov 


dec 
jnz 


to skip in row to/from ‘from! 
address for scroll up/down 


di, bp 03 add/subtract number of bytes 
to skip in row to/from ‘to! 
address for scroll up/down 

ah ; 03 decrement rows to move 

v_mv_end ; 04/16 did we move the last row 

Cl. dz 3 2 number of columns to move 

H up/down per row 

al ; 03 

v_mv_row ; 04/16 


; Worst case:(98)+(4+4+4)+[6#(13694+34+34+3+44+2+3) J+[5#16]+(4) 
= 984+12+8322+80+4 = 8516 cycles = 88.71% *® 9600 cycles = 1.065ms < 1.2ms 


short v_mv_lp 


; ah has number of rows to move 
el, dl ; number of columns to move 
movs word ptr es:[di],word ptr es:[si] 

; move the row (es:di gets es:si) 


si,bp ; add number of bytes to skip in row to 
; ‘from' address for scroll 

di,>p ; add number of bytes to sip in row to 
; ‘to' address for scroll 

ah 

v_mv_flp 
; enable interrupts immediately 

below. 


Clear bl rows 


v_clr_bot: 


Clear bl rows 


violr: 


mov 
emp 


je 


mov 


v_clr_lp: 


mov 


push 
mov 
add 


below/above if scroll up/down (based on bp & direction flag DF). 


ah, bh 

byte ptr ds:[v_mode],7 

v_clr_fast ; jump to fast loop 

el,dl ; cl = no. of columns to clear per row 
; (bl = number of rows to clear) 

bhi,* * ; bh = blanking character 

dx ; save dx 

dx,word ptr ds:[v_base6845] ; get 6845 pointer register 

dx,6 ; get 6845 status register 


Wait for horizontal retrace... 


Voelr_his 


in 
rer 
je 
eli 


v_elr_lo: 


in 
rer 
jne 


mov 


-list 


. 
7 


stosw 


wait till we're in a scanline 


al,dx ; get CRT status 
al,i ; test display enable (bit #0) 
v_elr_hi ; wait for display enable low (cf) 

; disable ints first. 

; wait till start of horiz. blanking 
al,dx ; 08 get CRT status 
al, 1 ; 02 test display enable (bit #0) 
v_clr_lo ; 16/04 wait for display enable hi (cf) 
al, bh ; 02 al= bh= ' ' = blanking character 


i clear word (es:di gets ax) 


Worst case: (8+2+16)+(8+2+4)+(2+11) = 53 cycles = 66.25% of 80 cycles 


in 
pop 


dec 
jnz 


add 


dec 


jz 


mov 


al,dx ; 08 get CRT status (vert synch slow) 
dx ; 08 restore dx 
ex 3; 03 decrement columns to clear 
v_elr_nxt ; 04/16 did we move the last column? 
di, bp 3; 03 add/subtract number of bytes 

; to skip in row to/from ‘to! 


; address for clear for up/down 


bl * 03 decrement rows to clear 

v_serl_ret ; 04/16 did we clear the last row? 

el, dl ; 02 number of columns to clear 
: per row 


Worst case: [53]+(8+8)+(3+4)+(3)+(3+4+2) = 88 cycles = 11.00 usec 


v_clr_nxt: 


sti 
test 


al,08h 3; O4 check for vertical retrace 


ROM BIOS 
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F328 74 12 AZ v_clr_past ; 16/04 jump past vertical retrace code 
; We get here if vertical retrace has started... 

; NOTE: interrupts disabled for 1.1ms! 
F32A 8A C7 mov al,bh * Ol2 al= bh= ' ' = blanking character 


F32C BT7 07 mov bh, V_KCLEAR ; O04 at most 7 (not 10) rows per pass 


F32E v_clr_row: 
F32E F3/ AB rep stosw ; 09+10*80 clear the row (es:di gets ax) 
F330 03 FD add di, bp ; 03 add/subtract number of bytes 


; to skip in row to/from ‘to! 
: address for clear for up/down 


F332 FE CB dec bl ; 03 decrement rows to clear 
F334 74 15 jz v_scerl_ret ; 04/16 did we clear the last row? 
F336 8A CA mov el, dl : O2 number of columns to clear 
; up/down per row 
F338 FE CF dec bh 5. 1013 still working on 10 scan lines?? 
F33A 75 F2 jnz v_clr_row 5; 04/16 
; Worst case:[88)+( 4444244) +[ 108 (8094+34+34+44+24+3) ]+[9#16]4+(4) 
5 = 884+14+8240+1444+4 = 8490 cycles = 88.44% # 9600 cycles = 1.061ms < 1.2ms 
F33C v_clr_past: 
F33C FB sti ; enable interrupts immediately 
F330 EB C1 jmp short v_clr_lp 
F33F v_clr_fast: ; ah has attribute for blank line(s) 
F33F BO 20 mov aL," # ; al = blanking character 
; (bl = number of rows to clear) 
F341 v_cir_ fl ps 
F341 8A CA mov el,dl number of columns to clear 


C 
(ey 
Cc 
Cc 
Cc 
Cc 
Cc 
G 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
C 
GC 
Cc 
Cc 
c 
C 
Cc 
18) 
Cc 
C 
iC 
C 
Cc 
[5 
¢ 
(oy 
(8) 
Cc 
[e; 
Cc 
Cc 
C 
C 
Cc ; 
F343 F3/ AB Cc rep stosw ; clear the row (es:di gets ax) 
F345 03 FD c add di, bp ; add number of bytes to skip in row to 
c ; ‘to' address for scroll 
F347 FE CB C dec bl 
F349 75 F6 Cc jnz vu ClLFflp 
C | 
CC j,-------------------------- --- +--+ ee ee ee eee | 
Cc 
F34B C v_serl_ret: ; common clean up routine 
F34B FB Cc sti ; enable interrupts immediately 
C 
F34C 80 3E 0049 R O07 Cc emp byte ptr ds:[v_mode],7 
F351 74 03 (e je v_scrl_mode_7 
F353 AO 0065 R C mov al,byte ptr ds:[v_3x8] ; 
F356 C v_serl_mode_7: 
Cc 
C ; We did't disable display during vertical retrace... 
C 
C ; Clean up. 
Cc 
F356 FC Cc eld ; in case we are ‘call'ed & scroll down 
F357 5B Cc pop bx ; restore registers 
F358 59 Cc pop ex 
F359 SA iC pop dx 
F35A C3 c ret 
Cc 
F35B Cc voserl_up endp 
Cc 
Cc pr rr ee ee ee ee ee ee ee ee eee 
Cc H Scroll Active Page Down ah = O7h 
Cc 3 
Cc ; Input: if al = 0, then clear entire window with attribute in bh 
Cc ‘ else, al = number of rows to ‘scroll' down 
Cc; = number of rows to clear at top of window 
Cc ; bh = attribute to be used on blank row(s) 
CG xs (ch,cl) = (row,col) of upper left corner of window from (0,0) 
Cc ¥ (dh,dl) = (row,col) of lower right corner of window from (0,0) 
Cc i Output: ah = attribute to be used on blank row(s) 
Cc ; if v_mode = 7, al = 20h = space 
G- ¥ else al = v_3x8 
Cc 
Gc ¥ Assume: (contents of v_base6845)+6 = status register 
Cc; 
Cc % Trash: bp, si, & di destroyed. (bx thru dx destroyed if ROM stack) 
Cc Pn ee ee eee een 
Cc 
| F35B C v_serl_dn proc near 
H Cc 
| c assume cs:code, ds:data, es:v_ram, ss:nothing 
j Cc 
F35B FD c std ; NOTE: scroll down everything backwards 
C 
F35C E8 F53C R Cc call v_txt_md ; all registers preserved 
F35F 72 03 c jb v_txt_dn 
F361 E9 D909 R Cc jmp erf_graphics_down ; jump if graphics 
F364 C v_txt_dn: 
Cc 
F364 52 c push dx ; save registers 
F365 51 Cc push ex 
P366 53 c push bx 
¢ 


8-143 


ROM BIOS 
Listing 


F367 
F369 
F36B 
F36E 


F370 
F370 


F372 
F374 


F377 
FST 
F379 


F37C 


F37C 


F37C 
F37F 
F381 
F384 


F364 
F386 


F389 
F38B 
F38E 


F392 
F392 
F393 
F395 
F397 


F398 
F398 
F399 
F39B 


F39D 
F3A0 


F3A1 
F3A3 
F3A5 


F3A6 


ET I LE TE TO IS SSO I I. ST SI I ESET ENE SE SL SOLIS EI TE ALIS TOILET SEA 


8A 
8B 
E8 
74 


2B 


F7 
EQ 


FT7 
EQ 


E8 
T2 
EQ 


8B 
E8 


8B 
BA 
03 


E8 
72 
E9 


8-144 


F295 R 


DD 
F2F5 R 


F2 
0006 
16 0063 R 


D8 
FB 


D8 
FB 


8B 07 


D6 
DF 


F53C R 
03 
DA59 R 


AAQAAANANAAANAAAAAAAAARAAAAAAANAVAAAAAAAAAAAAARAAAARAANAAAAANANAAANAANDANAAANNDAAMDADAADAAANAANANAANAAANANAAANNAAAARAAANDANAAaAaaaan 


v_mv_dn: 
sub et ,ax ; subtract (bytes/row)*(rows to scroll) 
; from ‘from' address for scroll 
neg bp ; negate number of bytes to skip per row 
jmp V_mv ; now identical to scroll up! 
; Clear bl rows above. 
v_clr_top: 
neg bp ; negate number of bytes to skip per row 
jmp v_elr ; now identical to v_elr_bot! 
v_serl_dn endp 
fn ne nn en nn ee ee ee ee ee eee ee ee eee 
; Read Attribute & Character at Cursor ah = 08h 
, 
; Input: bh = current active display page (0-7) 
H Output: al = character read 
B ah = attribute of character read 
; 
; Assume: (contents of v_base6845)+6 = status register 
; 
; Trash si & di destroyed. (si = dx; di = bx) 
’ www wm em me we we we ew ew ew ee em wm ew ew ew we ee ee ee ew ee ee ee ew ee we ee ee ew ee ew ee ee ee ee ee ee ee ew ee ee ee ee ee 
v_rac proc near 
assume cs:code, ds:data, es:v_ram, ss:nothing 
eall v_txt_md ; all registers preserved 
jb v_txt_rac 
jmp erf_graphics_read ; jump if graphics 
v_txt_rac: 
mov di,bx ; Save bx 
eall v_fpos ; ax & si destroyed. 
; bx = offset into current page 
mov si,dx 3; save dx 
mov dx,6 ; get 6845 status reg. offset 
add dx,word ptr ds:[v_base6845] ; add 6845 pointer 


mov 
mov 
call 


jz 


; save line count 

; pass lower right coordinates.... 

; to common scroll positioning routine 
; Clear rows if nothing to move 


bl,al 
ax,dx 
v_scrl_pos 
v_clr_top 


Scroll cl rows down. 


; Wait for horizontal retrace... we can't read the screen during a trace 
without disturbing the screen image. 


v_rac_inline: 


in 
rer 
je 
eli 


v_rac_inblank: 


in 
rer 
jne 


mov 
sti 


mov 
mov 
ret 


make sure we're in a scanline 

get horiz. retrace blanking status 
test for horiz. retrace 

wait for display enable low (cf) 
disable ints FIRST 


al,dx 
al 
v_rac_inline 


; wait for blanking: 


al,dx > get retrace blanking status 

al, 1 ; test display enable (bit #0) 
v_rac_inblank ; try again if still in scanline. 
ax,es:[bx] ; char. and attr. now in AX 


; enable interrupts immediately 


dx, si ; restore dx 
bx, di ; restore bx 


Write Attribute & Character at Cursor ah = 09h 


Input: 


al = character to write 

bh = current active display page (0-7) 
bl = attribute of character to write 
cx = counter of characters to write 

bp = value to return in ax 

al = character to write 

ah = attribute of character to write 


(contents of v_base6845)+6 = status register 


bp, si & di destroyed. (si = ex; dx if ROM stack) 


wwe em ee ew em ee ee ee em ee em ee ee em ee eee ee ee ee ee ee ee ee ee ee ee ee 


near 


es:code, ds:data, es:v_ram, ss:nothing 


v_txt_md ; all registers preserved 
v_txt_wac 
erf_graphics_write ; jump if graphics 


YO 


F3AE 
F3B0 
F3B3 


F3B5 
F3B7 
F3B9 


F3BB 
F3BD 
F3BE 
F3C2 


F3C5 
F3C5 
F3C6 
F3C8 
F3CA 


F3CB 
F3CB 
F3CC 
F3CE 


F3D0 
F3D2 


F3D3 


F3D4 
F3D6 


F3D7 
F3D8 


F3DA 
F3DA 


F3DB 
F3DC 
F3DE 


F3DF 


F3DF 


EC 
DO 


FB 
F50D R 
DF 
C5 
E3 
E8 
Fi 


16 0063 R 
C2 06 


D8 
FB 


D8 
FB 


C5 


O04 


EB 


CE 


F50D R 


Fi 


D5 
C2 
E8 


0006 
16 0063 R 


D8 


C 
C 
C 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
c 
C 
C 
c 
Cc 
C 
C 
C 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
c 
C 
Cc 
C 
Cc 
C 
Cc 
C 
Cc 
Cc 
C 
C 
Cc 
Cc 
C 
C 
C 
C 
c 
Cc 
C 
Cc 
C 
Cc 
c 
C 
C 
Cc 
C 
Cc 
Cc 
Cc 
C 
C 
C 
C 
c 
C 
Cc 
C 
c 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
Cc 
Cc 
C 
Cc 
c 
Cc 
c 
Cc 
Cc 
c 
C 
Cc 
c 
Cc 
Cc 
c 
Cc 
c 
c 


mov 
call 
xchg 


mov 
mov 
mov 


mov 
push 
mov 
add 


di, bx 
v_fpos 
bx, di 
ax, bp 
ah, bl 
bp,ax 


si,cx 
dx 


dx,word ptr ds:[v_base6845] 


dx,6 
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save bx 


ax & si destroyed. 
bx = offset into current page 
restore bx; di = transfer offset 


restore ax 
transfer attribute byte to ah 
Save attribute & character in bp 


save cx 
save dx 

get 6845 pointer register 
get 6845 status register 


; Wait for horizontal retrace blank interval 


v_wac_hi: 
in 
rer 
jc 
eli 


v_wac_lo: 
in 
rer 
jne 


MoV 
stosw 


dec 
li et 
42 


stosw 


al,dx 
al, 
v_wac_hi 


al,dx 
al 54 
v_wac_lo 


ax, bp 


cx 


v_wac_end 


wait till we're in a scanline.. 
get CRT status 

test display enable (bit #0) 
wait for display enable low (cf) 
disable ints FIRST 


now wait till start of blanking.. 


08 get CRT status 

02 test display enable (bit #0) 
16/04 wait for display enable hi (cf) 
02 restore ax 

11 es:di gets ax (attribute & char) 
02 

04/16 

11 es:di gets ax (attribute & char) 


; Worst case: (8+2+16)+(8+24+4)+(24+11)+(2+44+11) = 70 cycles = 87.5% of 80 cycles 


ats ; enable interrupts immediately 
loop v_wac_hi » do it cx times 
v_wac_end: 
Std ; enable interrupts immediately 
pop dx ; restore dx 
mov cx, si ; restore cx 
ret 
vV_wac endp 
‘Casta cenne denna tokes macnastoassesesce sateen eae maacneacacceeboecce 
H Write Character at Cursor Position ah = OAh 
; 
; Input: al = character to write 
; bh = current active display page (0-7) 
; ex = counter of characters to write 
; bp = value to return in ax 
; Output: al = character to write 
; ah = top byte of offset of character in page 0 
; 
A Assume: (contents of v_base6845)+6 = status register 
, 
A Trash si & di destroyed. ex; dx if ROM stack) 
H wwmn newer ree ee wm em ew em wm wm ww em me wwe tP wm we we www eee eee w am we eee ew eee e eee eweaeeen ene eae @ 
v_we proc near 
assume cs:code, ds:data, es:v_ram, ss:nothing 
call v_txt_md ; all registers preserved 
jb v_txt_we 
jmp erf_graphics_write ; jump if graphics 
v_txt_we: 
mov di,bx ; save bx 
call v_fpos ; Si destroyed. 
j; ax = offset into page 0 
> bx = offset into current page 
xchg bx, di ; restore bx; di = transfer offset 
mov si,cx 3; save cx 
push dx ; save dx 
mov dx, bp ; retrieve character in dl 
mov al,dl ; get char in al (ah = attr.) 
mov bp,ax ; bp = (attr. char) 
mov dx,6 ; get 6845 status register 
add dx,word ptr ds:[v_base6845] ; wet 6845 pointer register 


; Wait for horizontal retrace... 


v_we_next: 


v_we_hi: 
in 
rer 


; 


get CRT status 
test display enable (bit #0) 
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a 


F401 72 
F403. FA 
F4O4 

F4O4 EC 
F405 DO 
F407 73 
F409 8B 
F4OB AA 
F4OC 49 
F4OD 74 
F4OF 47 
F410 AA 
F411 FB 
F412 47 
F413 E2 
F415 

F415 FB 
F416 5A 
F417 8B 
F419 C3 
FUIA 

F4UTA 

F41A AO 
F41D 8B 
F41F 8B 
F421 OA 
F423. 74 
F425 24 
F427 DO 
F429 73 
F42B OC 
F42D EB 
F42F 

F42F 80 
F432 24 
F434 OA 
F436 

F436 BA 
F439 03 
F43D EE 
F43E 8B 
F440 8B 
F4Y2 A2 
F4YS5 C3 
F446 
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FB 


D8 
FB 


c5 


06 


EQ 


CE 


0066 R 


FA 
F3 


FF 
OA 


DF 
DB 
OB 
20 
O07 


E3 1F 
EO 
C3 


0005 
16 0063 R 


DE 
D7 


0066 R 


Aa OSOEGEROSESEHEOSESHHE OG AEH EGEEESK AES H EKA EH OGRA OHH OE GAGEEHOHsAn HAA SAs Ga eGaeHNEVaaesangeaGnHsoaeHsanens 


{ 
je v_we_hi ; wait for display enable low (cf) 
eli ; disable ints FIRST ? 


v_we_lo: 
in al ,dx ; 08 get CRT status 
rer al, 1 ; 02 test display enable (bit #0) 
jne v_we_lo ; 16/04 wait for display enable hi (ef) 
mov ax, bp ; O02 restore ax = (attr, char) 
stosb > A es:di gets al (character) 
dec cx 3; 02 

-list 
jz v_we_end ; 04/16 
ine di ; 02 skip past attribute byte 
stosb eft es:di gets al (character) 


Worst case: (8+2+16)+4(8+24+4)+(2+11)+(2+4+2+11) = 72 cycles = 90% of 80 cycles 


sti ; enable interrupts immediately 
ine di ; skip past attribute byte 
loop v_we_next ; do it cx times 
v_we_end: 
sti ; enable interrupts immediately 
pop dx ; restore dx 
mov ex, si ; restore cx 
ret 
viwe endp 


. 


Set Overscan, Back, & Foreground Colors ah = OBh 


Input: bh = palette color ID to set (0-127) 

bl = color value to be used with that color ID 
Output: ah = v_mode 

al = new v_colorpal 
Assume: (contents of v_base6845)+5 = overscan register 


Trash: si & di destroyed. (si = bx; di = dx) \ ] 


v_ceol proc near 
assume cs:code, ds:data, es:v_ram, ss:nothing 
mov al,byte ptr ds:[v_colorpal ] ; get current palette 
mov di,dx ; save dx 
mov si,bx 3; save bx 
or bh, bh ; palette color ID = 0? 
jz v_col_0O ; handle color ID 0 
and al,ODFh ; clear palette select bit #5 
rer bl,1 ; test new color (bit #0) 
jnb v_col_1 ; if bit #0 set, all done 
or al,20h ; else set palette select bit #5 
jmp short v_col_1 
v_col_0: 
and bl,01Fh ; save bits #0-4 of new color 
and al,OEOh ; clear bits #0-4 of old color 
or al,bl ; and combine the two. 
v_col_1: 
mov dx,5 ; get 6845 overscan reg. offset 
add dx,word ptr ds:[v_base6845] ; add 6845 pointer register 
out dx,al ; output selection 
mov bx, si ; restore bx 
mov dx, di ; restore dx 
mov byte ptr ds:[v_colorpal],al ; save the value for later 
ret 


. 


Terminal Emulator to active page ah = OEh 


character to write 

foreground color in graphics mode 
value to return in ax 

Output: All registers saved. 


Input: al 


oc 
e 
uuon 


Trash: si & di destroyed. (si = cx; di = bx; dx if ROM stack) 
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F446 
FUNG 3C 
FUNB 75 
FONA EQ 
FUYD 
FUUD 52 
FANE 8B 
F450 8B 
F4US52 BT 
FU5Y 22 
F458 Bu 
FUSA CD 
FU5C BB 
FUSE Bg 
FU61 BY 
F463  3C 
F465 74 
FUB7 3C 
F469 74 
FU6B 3C 
FU6D 74 
FU6F CD 
FUT1 FE 
| F473 3A 
FUTT 72 
F479 32 
F47B 80 
F480 BY 
F4uB2 74 
F4UB4 BY 
F486 3A 
FUBB 74 
FUBA FE 
FUBC 
FU8C BY 
FUBE EB 
FQ) 
FugQ1 BY 
F493 CD 
F495 32 
F497 EB 
FU9A 73 
F4Y9C BY 
| F4Y9E CD 
| FY AO 
FUAO 33 
. 
| F4UA2 BA 
| FUAY BB 
FUAT BA 
FUAB 80 
FUAE 80 
F4B3 Bb 
FUBS 74 
F4B7 B6 
F4B9 
FUB9 CD 
FUBB 
F4BB 8B 
F4BD 8B 
FUBF 8B 
| FUCT SA 
| FYC2 C3 
F4C3 OA 
F4C5 74 
F4C7 FE 
F4¥CQ EB 


Pe 


07 
03 


FS4E R 


Fi 
FB 


O07 
3E 0062 R 


16 OO4A R 
3 


D2 


3E 0049 R 4B 
31 
02 
18 
FY 
07 
C6 


02 
29 90 


02 
10 


EY 
F53C R 
04 


08 
10 


cg 


FC 
0601 


16 OO4A R 

EA 01 

3E 0049 R 48 
31 

02 

18 
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v_terminal proc near 


assume 


cmp 
jne 


jmp 


v_term_nobell: 


Viz. 


push 
mov 
mov 


es:code, ds:data, 


al, BEL 
v_term_nobell 


v_bell 
dx 


si,icx 
di, bx 


Get cursor position in active page. 


mov 
and 


mov 
INT 


mov 
mov 
mov 


Handle special cases: 


emp 
je 
cmp 
je 
cmp 


je 
Normal Case: 
INT 


ine 
emp 


jb 


xor 


oe oa emp 


mov 
je 
mov 
emp 
je 


ine 


lrow: 


v_set_new_cur: 


Viz 


mov 
jmp 


serl_tity: 
mov 
INT 


xor 
call 
jnb 


mov 
INT 


bh,O7h 
bh, byte ptr ds:(v_apage] 


ahn,0O3h 
10h 


ax, bp 
ex, 1 
ah,OAh 


dx has (row,col) 


al,LF 
v_kf 
al,cCR 
v_er 
al,BS 
v_bs 


write the character 
10h 


dl 
dl, byte ptr ds:[v_width] 
v_set_new_cur 


dl,dl 


byte ptr ds:[(v_mode],72 
ah,49 

v_lrow 

an,24 

dh,ah 

v_scerl_tty 

dh 


ah,O2h 
v_term_ret 


ah,02h 
10h 


ah,ah 
v_txt_md 
v_serl_tty_graphics 


ah,08h 
10h 


v_scrl_tty_graphics: 


, 


xor 


mov 
mov 


mov 
sub 
emp 
mov 
je 


mov 


term_ret: 
INT 


v_term_nop: 


Clean up. 


mov 
mov 
mov 
Pop 
ret 


ex, cx 


bh, ah 
ax,0601h 


dl, byte ptr ds:[v_width] 
dil. 

byte ptr ds:[(v_mode],72 
dh,49 

v_term_ret 

dh,24 


10h 


ax, bp 
bx, di 
ex, si 
dx 


dl,dl 
v_term_nop 

dl 
v_set_new_cur 


es:v_ranm, 


ss:nothing 


is it bell character? 


MOD 8 
(0-7) 


ask for page number, 
get active page number 


call v_r_curs_pos 
(dh,dl) = (row,col) of cursor 
(ch,cl) = cursor mode setting 


restore ax 
character count for write char 
function code for write char 


of current cursor position. 


’ 


mee ee ee ee we wee we wee we we we 


is it a line feed? 
is it a carriage return? 


is it a backspace? 


to write the character 


increment the column 
column overflow? 
set new cursor position 


carriage return cursor 


is this mode 72 ? 

mode 72 has 50 rows 

jump if mode 72 

modes 4,5,6,64 have 25 rows 
are we at last row yet? 

if yes, go scroll the screen 
otherwise, inc to next row 


call v_curs_pos to set new 
cursor position 


= (row,col) = (24,0) or (49,0) 
call v_curs_pos to set cursor 
and so that we can read back 
the proper attribute byte 


ah = 0 for graphics 
are we text mode? 
jump if graphics 


eall v_rac 
to get attribute byte in ah 


(ch,cl)= upper left (row,col) 
= (0,0) 

store attribute in bh 

call v_scrl_up to scroll 

one line with attribute bh 

(dh,dl)= lower right (row, col) 

column = v_width-1 

is this mode 72 ? 

if yes then row = 49 

jump if mode = 72 

if not mode 72 then row = 24 


restore ax 
restore bx 
restore cx 
restore dx 


back space -- column = 0 ? 
don't change cursor position 
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Cc 
Cc 
F4CB 32 D2 C vier: xor dl,dl ; carriage return 
F4CD EB BD c jmp v_set_new_cur 
Cc 
F4CF C v_terminal endp 
Cc 
Cc SHA SaaS SSS SKK SS SSS Meese SSlSs SSSR SSS SSS HSS SS SS SSS SSS SS SSS. 
Cc H Read Current Video Status ah = OFh 
Cc 3 
C H Input: None. 
G Output: ah = number of character columns on screen 
c 4 al = display mode currently set 
Cc; bh = current active display page (0-7) 
Cc 
Cc : Trash: None 
Cc Sara cSacSeSsesie se ae nS RSS s Se SSeS ris SS Sear eS SSS ee 
Cc 
F4CF C v_stat proc near 
Cc 
c assume cs:code, ds:data, es:v_ram, ss:nothing 
(e 
F4CF 8A 26 OOHA R c mov ah, byte ptr ds:[v_width] 
F4D3 AO 0049 R C mov al, byte ptr ds:[v_mode] 
F4D6 8A 3E 0062 R Cc nov bh, byte ptr ds:[v_apage] 
F4UDA 80 ET O7 Cc and bh,O7h ; page number mod 8 
F4DD C3 c ret 
Cc 
F4DE C v_stat endp 
Cc page 
C (EDSSESSSE SSS SS SSsSSSS STs SsSss ess cS SSS SSS SSS SSeS SSS SSS SS SSS SSMS SSS 
C 
C. Peecacdeccees senses sees Ssose se Sera SSS HERES RSS SSSC RH Se SS See 
c ; Common scroll positioning and register initialization routine. 
Cc . 
Cc : Input: (ah,al) = starting (row,col) position from (0,0) 
Cc 3 = (ch,el) for up / (dh,dl) for down 
Cc bh = attribute to be used on blank row(s) 
C ; if bl = 0, then clear entire window with attribute in bh 
G else, bl = number of rows to ‘scroll' up / down 
Cc j = number of rows to clear at top / bottom of window 
c (ch,cl) = (row,col) of upper left corner of window from (0,0) 
CG. 3 (dh,dl) = (row,col) of lower right corner of window from (0,0) 
Cc . 
Cc : es: he ra + 
Cc. | (ch, el) | 
G. 34 H t------ +--+ + H 
Cc }; | | | H 
Gs { | i H 
CG. 73 | i ' H 
Cc ; | * penne ee ne --- --- e  ennnrne + | 
Cc 3; i bl tf | H 
Ge 3 H Vo ¢-------------------- = + H 
c- 3 H (dh, dl) H 
Cc H $e oe ee ee ee eee ee errr + 
Cc 5 
Cc 4 Output: zf = state of bl at entry (nz if scroll; z if clear only) 
¢ 4 ax = (number of bytes/row) * (number of rows to scroll) 
c = (2 * bl *® v_width) 
Cc bh = attribute to be used on blank line(s) 
Cc Hi if bl = 0 at entry, then clear entire window with bl attribute 
Cc (3 bl = dh = window height to clear 
Cc : else, bl = number of rows to “scroll' up / down 
C H = number of rows to clear at top / bottom of window 
Cc ; ch = zero 
Cc 3 el = number of rows to move 
Cc : = delta of upper and lower coordinates-bl = (dh-bl) 
e ¢ (dh,dl) = delta of upper left and lower right coordinates 
Cc H = window height and width 
Ce as bp = number of bytes NOT to move per row (2#(v_width -dl)) 
Cc “se si = ‘from' address for scroll 
¢ 3 di = ‘to' address for scroll 
G 4 ds = data_seg (preserved) 
Cc : es = para_mono 
Cc 
Cc 4 <-- bp -> <-- bp -> 
Cc ; es: eee eet tt rer + 
c 3 | si, di offset if up ' 
Cc 3 H +----- 2 ------------ = - = +--+ + * | 
Cc ; | | <------------ dl ------------- >t 4 | 
Cc 3 | H 1 | | 
Cc; | i | | dh | 
oC 3 O petinaiiewmmedem meen aia ca mbites en | 
C. 3 | br tf 1 | i 
Cc 3 H V te------ oe ene nee ee ee eee + Vv | 
c ¢ | si, di offset if down | 
Cc H tw ww enw wm erm ee wwe eww ere ereree wren eee wow mw r mK Kt 
Cc 5 
CC pene eee --- ae ------ enn ee wo---- woe eee wo--- 
Cc page 
F4DE C v_serl_pos proc near 
Cc 
c assume cs:code, ds:data, es:v_ram, ss:nothing 
Cc 
F4DE E8 F52B R Cc eall v_posn ; (ah,al) -> ax offset; si trash 
c 
FUE1 2A FS Cc sub dh,ch ; (dh,dl) gets delta (drow,dcol) 
F4E3 FE C6 c ine dh ; dh = number or rows 
F4E5 2A D1 Cc sub dl,cl 
FYE7T FE C2 c ine dl ; dl = number or columns 
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F50D 


F50D 
F5OF 
FS14 
F514 
F516 


F518 
F518 
FS 1:C 
F51D 


FSF 
FSF 
F524 
F525 
F528 
F52A 


F52B 


F52B 


F52B 
F52D 
F531 
F533 
F537 
F539 
F53B 


F53C 


F53C 


8B 
81 
8A 
F6 
03 
D1 
C3 


36 
FO 
FE 


C7 
DB 


OO4E R 


0007 


FO 
07 


1E 


F9 


E6 
84 


OO4C R 


0050 R 


F52B R 


D8 


FO 
E6 
cy 
26 
C6 
EO 


OOFF 


OO4A R 


PLL PLE LESAGE OOS EO STOOAAS SESS OOAASACAE CAAA AAA AOA CAAA een aos ana eae HES Oeneoananesanneoaasache 


mov si,word ptr ds:([v_top] ; get offset of active page 

add si,ax ; add offset in page => 'from' 

mOV di,si ; » 'to' addresses. 

xor Cx, Ox ; init count register to zero. 

mov el,dl ; CX = number of columns = dl 

mov ax,word ptr ds:[v_width] ; wet screen width 

mov bp,ax ; bp = v_width 

sub bp, cx ; bp = (v_width - dl) 

shl bp,1 ; bp = 2 ® (v_width - dl) 

shl al,1 > al = 2 * v_width 

mul bl ; ax = 28v width*no. of rows 

mov cl,dh 

sub el, b2 ; cl <= number of rows to move 

or bl,bl ; if rows to scroll, 

jnz v_serl_mv_and_celr ; then, move & clear row, return nz. 

mov bl,dh ; else clear dh rows only, return z. 
v_scerl_mv_and_clr: 

ret ; ZF indicates state of BL at entry 
v_scrl_pos endp 

page 


Calculates video ram buffer offset of a character in text mode 


Input: bh = current active display page (0-7) 
= offset of character in text mode at display page 
= (page number)*®(v_height)+offset of v_curpos(bh) 
ax = offset of character in text mode from page 0 


’ 
: Output: bx 
; 


v_fpos proc near 


assume cs:code, ds:data, es:v_ram, ss:nothing 


mov al,bh ; al gets page number 
xor bx, bx > bx = 0 
and ax,O07h ; ax = page number mod 8 
mov si,ax ; si keeps page number mod 8 
jz v_fpos_0 ; page number = 0? 
v_fpos_lp: 
add bx,word ptr ds:[v_height] ; Optimization: word multipli- 
dec ax ; cation by less than 8 without 
jnz v_fpos_lp ; destroying dx (or ex). 
v_fpos_0: ; bx = (page number)*(v_height) 
shl sit ; page number mod 8 word index 
mov ax,word ptr ds:[si+v_curpos] 
call v_posn ; (ah,al) -> ax offset; si trash 
add bx, ax ; bx = (page)*(v_height)+offset 
ret 


Calculates video ram buffer offset of a character in text mode 


, 

’ 

; Input: (ah,al) = (row,col) position 

H Output: ax = offset of character in text mode. 
, 
, 


Trash: si destroyed. 


v_posn proc near 


assume cS:code, ds:data, es:v_ram, ss:nothing 


mov si,ax 
and si,OFFh ; si keeps column (al) 
Mov al,ah ; al gets row (ah) 
mul byte ptr ds:[v_width] ; ax gets (row ® v_width) 
add ax, si ; ax gets (row ® v_width)+ column 
shl ax,1 ; ax gets 2®((row ® v_width)+column) 
ret 
VvV_posn endp 


Is v_mode text or graphics or black/white card? 


Input: None. 
Output: carry flag (cf) set if text. carry flag cleared if graphics. 


’ 

’ 

; Text Modes: 0 to 3 and 7 

; Graphics Modes: 4 to 6, 64, and 72 
’ 
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F53C 
F541 


F543 
F548 
FOUA 
F54B 


FS4C 
F54C 
FS 4D 


FO4E 


FS4E 


FSUE 


FS4F 
F551 
F553 
F555 
F557 
F559 


F55B 
F55D 
FOSF 
F561 


F563 
F564 
F567 
F567 
F56A 
F56C 


F56D 
FO6F 


EST 
F572 


F573 


F573 


F573 


F573 


F573 


F575 
FSTT 
F578 
F57B 
F57C 


FST F 
F5 81 
F582 
F585 
F5 87 
F588 


F58B 
F58D 


BA 


32 
EE 
E8 
EC 
E8 


BO 
EE 
E8 
BO 
EE 
E8 


BO 
EE 


3E 0049 R O4 
09 


3E 0049 R 07 
02 


B6 
43 
00 
42 
06 
42 
61 
EO 
03 
61 
00c8 
EF47 R 
FB 


cy 
61 


E8 
co 
E8E2 R 
E8E2 R 
09 


E8E2 R 
C1 


E8E2 R 


04 


RARARARARDADAAAADAAANAAMAANANAMAAANAAMANAANMAMAAAMAAMAANANAANAANNANAAANMNAANAANANAAANAAANAAANAN 


AOWAARAAAAAGAAAGAAHOAAAAAAAAGaAEAAARAAAAAAAe A Aa aA a 


assume cs:code, ds:data, es:v_ram, ss:nothing 


emp byte ptr ds:[v_mode],4 

jb v_txt_ok 

cmp byte ptr ds:(v_mode],7 

je v_txt_ok 

ele ; graphics mode (CF = 0) 

ret ; modes 4 to 6, 64, and 72 
v_txt_ok 

ste ; text mode (CF = 1) 

ret ; modes 0 to 3 and 7 
v_txt_md endp 


H Handle BEL character: Beeps the speaker. 
’ 

‘ No parameters, 

i 

v_bell proc near 


assume cs:code, ds:data, es:v_ram, ss:nothing 


push ax 
mov al,t2cemd ; p_8253_2, lsb 1st, mode 3,no BCD 
out p_8253_ctrl,al 
mov al,0Oh >; p_timer count 
out p_8253_2,al ; least significant byte 
mov al,06h 
out p_8253_2,al ; most significant byte 
in al,p_ketrl ; wet control data 
mov ah,al ; save control status 
or al ,0O3h ; turn speaker on 
out p_ketrl,al 
push Cx 
mov ex,200 ;512 msec 
bell_wait: 
call F_wait_one_ms ;wait for 1 ms 
loop bell_wait 
pop cx 
mov al,ah ; restore control status 
out p_ketrl,al 
pop ax 
ret ; return from v_term 


v_bell endp 


code ends 


include com3.asm 


code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


INS8250 Asynchronous Communication Chip Baud Rate Time Constants 
(baud rate generator signal is 3.6864 MHz put through a 
divide-by-2 circuit). 


((3,686,400 Hz)/2) = Input Freq. 


scc_init proc near ; ah = 00h 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


mov ch,al ; save input parameters. 

xor al,al 

out dx, al ; dummy read on sce_ctl_x 

call rs_dly 

in al,dx ; insures proper register addr. 
call rs_dly 

mov al,9 ; select write register #9 

out dx,al ; reset and disable int 

call rs_dly 

mov al,11000001b ; bw reset, st=0, mie=dis, nv=1 
out dx, al 

call rs_dly 

mov al,4 ; select write register #4 

out dx, al ; transfer parameters 
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E8& 


BO 


E8E2 R 


yy 


E4 04 


E4 18 


oc 
E8E2 R 
DD 
E3 OOEO 


om) 
EB 


8B 87 E729 R 


E8E2 R 
OD 
E8E2 R 
cy 
E8E2 R 
OE 


E8E2 R 
03 


E8E2 R 
01 


E8E2 R 
CO 


E8E2 R 
03 
E8E2 R 
01 
DD 


E3 0003 
8A AT F62E R 


DAMMAM AANA SEIS IANA OGD AMAAAY AAA AO DG AAV Gd AO AAO AAA AAGAGASGGS WAGGA DAGOCAGDGGADODEAAEAAASOROGDEDOOAGGGAEEOKSGGaAGEOGGS 


mov 
shr 


rs_dly 
al ,01000100b 


ah,ch 
ah,00000100b 
ah,1 

al,ah 


ah,ch 
ah,00011000b 
cL 53 

ah,cl 

al,ah 


dx,al 
rs_dly 


al,11 

dx,al 

rs_dly 
al,01010101b 
dx,al 

rs_dly 


al 412 
dx, al 
rs_dly 


bl,ch 
bx,11100000b 
e1,4 

bl,cl 


; NOTE: These values are the SAME as the com_baud 


mov 


nov 
dec 
dec 


out 
call 


mov 
out 
eall 


mov 
out 
call 


mov 
out 
call 
mov 
out 
call 


mov 
out 
eall 
xor 
out 
eall 


mov 
out 
call 


mov 


mov 
and 
mov 
mov 
shl 
or 


out 
eall 


mov 
out 
call 


mov 
xchg 
or 
xchg 
jnz 
mov 


scc_pwrup: 
shr 
or 
out 
eall 


ax,word ptr cs:[bx+sce_baud] 


ax,word ptr cs:[bx+com_baud] 


ax 
ax 


dx,al 
rs_dly 


al,13 
dx,al 
rs_dly 


al,ah 
dx,al 
rs_dly 


al,14 

dx, al 

rs_dly 

al ,00000011b 
dx,al 

rs_dly 


al,1 
dx, al 
rs_dly 
al,al 
dx,al 
rs_dly 


al ,3 

dx, al 

rs_dly 
al,00000001b 


bl,ch 
bx,00000011b 


ah, byte ptr cs:[bx+sce_dbit] 


cl,6 
ah,cl 
al,ah 


dx,al 
rs_dly 


al,5 
dx,al 
rs_dly 


al ,00001000b 
ax, bp 

ah,ah 

ax, bp 
scc_pwrup 
al,10001010b 


ah,1 
al,ah 
dx,al 
rs_dly 
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16x, 8-bit synch, 1 or 2 stop 
get input parameters. 

get bit #2 

move to bit #3 

“or' the bit 


get input parameters, 
get bits #3 & 4 


move to bits #0 & 1 
“or' the bits 


all done!!! 
select write register #11 
clock mode control 


no X,r=sbdr, tebr, txe o, tx ok 


select write register #12 
low byte of baud rate const 


get input parameters. 
get bits #5, 6, & 7 (clear bh) 


move to bits #1,2,& 3 
bx is word index 


EXCEPT for the - 2!!1! 
get 8530 baud count 
get 8250 baud count 
and subtract 2!/!1!1! 


Output low byte of baud rate 


select write register #13 
high byte of baud rate const 


output high byte of baud rate 


select write register #14 
baud rate generator enable 


baud generator enable & source 


select write register #1 
data xfer mode definition 


rx dis, pty no spec, tx dis 
ext dis 


select write register #3 
RxD parameters and control 


RxD enable 


get input parameters. 
get bits #0 & 1 (clear bh) 


move data bits to #6 & 7 
“or' the data bits 


select write register #5 
TxD parameters and control 


TxD enabled. (power-up value) 
get original function code 

is it 0 or FF? 

restore AX 

jump if original AH=OFFh 

TxD, DTR,RTS enabled. (normal) 


move bits #6 & 7 to #5 & 6 
“or' the bits 


a SE TIT EE TE IOS AL IEEE DIOLS DE SL LE TEL LILES I ELT ALE ILLES EEL IT OEE TIDE TA ITO LIE EE EAD DAB EAD SE CCIE ILRI SPEED EOE LEIS. 
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F62B 


F62E 
F62F 
F630 
F631 
F632 


F632 


F632 


F841 
F841 
F841 
F842 


F843 
F846 


F848 
F84B 


FB4C 


F84D 


F84D 
F84D 
F84D 
F84E 


FE4F 
F852 


F854 
F857 


F858 


F859 


F859 
F859 
F859 
F85A 
F85C 
F85F 


F85F 


E9 E88A R 


00 
02 
01 
03 


A1 0013 R 


FB 

1E 

B8 0040 
8E D8 


A1 0010 R 
iE 


CF 


FQ 
B4 86 
C2 0002 
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qgaagaannnaanaanaanana 


AIQNAANAAAANAAAANAAAAAAAAAAAAANAAANDAAAAAAAAAAAAAANAARAAADADAAAAAAAAAA Aa AAA AAA A AA AAA AAA AAAAGaGaAa 


jmp scc_stat ; return status 


scce_dbit db 00b : 5 data bits (0) (non- ) 
db 10b : 6 data bits (1) (non- ) 
db 01b : 7 data bits (2) 
db 11b ; 8 data bits (3) 

scc_init endp 

code ends 


include mem.asm 


code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


ORG OFB41h 


m_size proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


sti 

push ds 

mov ax,data_seg 
Mov ds,ax 


assume cs:code, ds:data, es:nothing, ss:nothing 


mov ax,word ptr ds:[memory_size] 
pop ds 
iret 


ORG OF84Dh 


m_equip proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


sti 

push ds 

mov ax, data_seg 
nov ds,ax 


assume cs:code, ds:data, es:nothing, ss:nothing 


mov ax,word ptr ds:[switch_bits] 
pop ds 
iret 


ORG OF859h 


mM_cass_ proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


ste ; error 
mov ah, 86h 
ret 2 

; iret 


m_cass endp 


code ends 
include nmi.asm 


pT SSS SSS SS SSS SSS SSS SSS SSS SSS SSS SS SSS SH SSSSSSSessrsssssssesssssrsessessszssz=eze 
H Filename: nmi.sre 

H 

; This module includes INT 02h. 

; 

,;2zsssesses SSSS SSS SSS SSSSSSSSSSSSSsSssSssesssssssssesssssesszrszesesszeszezee 


F85F 


F85F 


F85F 


F85F 
F860 


F860 


F860 


F860 


F860 
F861 
F862 


F863 
F868 
F86E 


F872 
F875 


F878 
F87A 


F87B 
F87B 
F87D 
F87F 


CF 


FB 
55 
56 


2E: 
C7 
8C 


BE 
E68 


32 
53 


33 
8E 


8E 


8E 1E E5F2 R 
06 0084 R E2CE R 
OE 0086 R 


DBB7 R 
E5FA R 


DB 


co 
D8 
co 


aeaAaqnanaanonaoaaadeana 


Cc 
Cc 
C 
Cc 
C 
C 
C 
Cc 
C 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
Cc 
Cc 
C 
c 
c 
C 
c 
C 
C 
C 
c 
Cc 
Cc 
c 
c 
C 
Cc 
Cc 
c 
c 
c 
Cc 
Cc 
Cc 
C 
c 
Cc 
C 
C 
Cc 
Cc 
C 
Cc 
c 
Cc 
c 
Cc 
c 
Cc 
C 
C 
Cc 
c 
C 
Cc 
C 
Cc 
c 
c 
C 
Cc 
Cc 
Cc 
Cc 
c 
Cc 
Cc 
c 
c 
c 
c 
Cc 
c 
c 
Cc 
Cc 


n_int 


bt_o: 
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segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


INT O2h 
ORG OF85Fh 
proc near 


assume cs:code, ds:nothing, es:nothing, ss:nothing 
iret 
endp 
ends 


boot2.asm 


This module includes INT 19h. 


segment public 'ROM'! 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


INT 19h -- Cold boot routine: 


This code reads Track 0, Side 0, Sector 0 into memory at 
0000:7C00 and iret's into the secondary boot-strap loader 


Note: The stack looks like this at exit!!!! 
High Address 
lao nae ame | <=- sp (at entry & exit) 
| return fsw flags | 
1 1 
ia a ee a a 1 
{| return cs segment} 
' 1 
See a ee eee en eee ee 1 
i return ip offset | 
penne ee | <=- sp after INT 19h trap 
H saved si, bp H 
|------------------ | <-- sp at loading of return address 


Low Address 


Output: 

(DL) = Driver Number { 00h -> Floppy Drive (A:); 
Oth -> Floppy Drive (B:); 
80h -> Fixed Disk (Ci) J 

(DH) = Head Number { These three parameters will 

(CH) = Cylinder Number specify the booted partition 

(CL) = Sector Number in the case of the fixed disk. ] 

(AH) = Successful status = 0. 

(AL) = Number of Sectors read [in order to read 512 bytes. ] 

(ES:BX) = Address of the transfer [0000:7C00] 

(DS :BX) 


(CS:IP) = Address of entry point [0000:7C00] 


(SS:SP) = Stack Segment and Pointer are left intact from the INT 
19h invocation for multi-tasking environments. 


(IF) = The interrupt enable flag is left intact from the INT 
19h invocation for multi-tasking environments. 


proc near 
assume cS:code, ds:nothing, es:nothing, ss:nothing 


sti ; enable interrupts 

push bp ; save BP & SI 

push si 

assume ds:data ; reset master table ptr to ROM 
mov ds,word ptr cs:[set_ds_word] ; Satisfy assumption 

mov word ptr ds:({master_tbl_ptr+0000h],cs:(offset mastab) 

mov word ptr ds:[master_tbl_ptr+0002h],cs 

mov si,cs:(offset bt_m) ; boot strap message 

eall DRomString ; print banner 

xor bl,bl ; disable error message blinking 
push bx ; save blink status 


assume ds:abs0, es:abs0 
; boot strap outer loop 


xor ax,ax ; AX = absO_seg. 
mov ds,ax ; Satisfy assumptions 
mov es,ax 


ROM BIOS 
Listing 


F881 
F887 


F88B 
F8BE 


F88E 
F890 
F892 
F894 
F896 
F898 


FB9A 
F89D 


F89F 


F8 AO 
F8A1 
F8A3 


FB AY 
FB AY 


F8A6 
F8AT7 
F8A9 


F8 AB 
FBAE 
F8BO 


F8B3 
F8B3 
F8 B6 


F8B9 
F8B9 
FBBA 
F8BB 


F8BD 
F8BE 
F8C1 


F8C2 


F8C4 
F8C4 
F8C7 
F8CA 
F8CB 
F8CC 
F8CE 
F8D1 

F8D4 
F8D5 


F8D6 


F8D6 


C7 06 0078 R EFC7 R 
8C OE OO7TA R 


BD 0003 


B8 0201 


B7 7C 


gS DY 


80 CB 01 


EB B7 


BE DBF6 R 
E8 ESFA R 


8B EC 
89 5E 02 
8C 46 O4 


ARVOAVARMAAANAAGA DAHOGDAAAVO AAAAADADGOOOAGAHAAGAAOAOAGAGDOHOAUAADAGOAGDSAGDAGAGDAGHAGOEAEDAAEAPDAIAEASAOHOHOSESEEOOCOOOHESHS 


; Reset 


fd_parms table vector. 


mov word ptr ds:({intiElocn+0],cs:(offset fd_parms) 
mov word ptr ds:({int1Elocn+2],cs 


; Initialize retry loop. 


bt_i: 


mov bp,3 ; retry counter 
; boot retry inner loop 


; Initialize the driver. 


xor ax,ax ; AX = 0. 

mov bx,ax 3 BX = 0, 

mov cx,ax % CX = 0. 

mov dx,ax 3: DX = 0 

INT 13h 

je bt_nxt > try again, if error 


; Read the boot sector. 


btE_nxt: 


bt_blnk: 


bt_dec: 


bt_ok: 


c_datal 


mov ax,0201h ; read one sector 
; bl = 0. 
mov bh,7Ch ; xfer address = ES:BX = 0:7C00 
; ex = 0. 
ine cx ; track 0; sector 1 
. dx «= 0. 
; head 0; drive 0O 
push es ; Save return registers 
INT 13h ; BX,CX,DX,SI,DI,BP, & DS saved 
pop es ; restore return registers 
jne bt_ok ; jump if no error during read 
pop bx ; get blink status 
or bl, bl ; have 3 retries been completed? 
jz bt_dec ; jump if no 
mov si,cs:(offset bt_merr) ; blink error message on 
js bt_blnk ; blink state from BL above 
mov si,cs:(offset bt_spaces) ; blink error message off 
call DRomString ; blink error message 
xor b1l,10000000b ; toggle blink state 
push bx ; resave blink status 
dec bp ; decrement retry count 
jnz bt_i ; and, try again 
pop bx ; get blink status 
or bl,1 ; enable error message blinking 
push bx ; Save new status 
jmp bt_o ; and try again, for now. 
mov si,cs:(offset bt_spaces) ; blink error message off 
call DRomString 
pop si ; discard blink status 
pop si ; restore SI 
mov bp, sp 
mov word ptr ss:[bp+2],bx ; return IP = BX = 7CO0Oh 
mov word ptr ss:[bp+4],es ; return CS = ES = 0000h 
pop bp ; restore BP 
iret ; return flags 
endp 
ends 


calendar.asm 


Filename: ecal.sre 


This module includes c_read and ec_write of INT 1Ah. 


segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


proc 


; Days per year. 


e_dy_yr 


dw (0#366)+(0*365) ; year 0 = leap year + 0 
dw (1#366)+(0#365) ; year 1 = leap year + 1 
dw (1#366)+(19365) ; year 2 = leap year + 2 
dw (1#366)+(2#365) ; year 3 = leap year + 3 
dw (1#366)+(39365) ; year 4 = leap year + 0 
dw (2#366)+(3#365) ; year 5 = leap year + 1 
dw (2#366)+(4#365) ; year 6 = leap year + 2 
dw (2#366)+(5*365) ; year 7 = leap year + 3 


; Days per month. 


F8F2 


F8F2 


F8F3 
F8F6 
F8F7 
F8F8 


F8FB 


F8FD 
F8FF 


F902 


F903 


F905 
F906 


F909 


FOOA 


1F 

1C 

1F 

1E 

1F 

1E 

1F 

1F 

1E 

iF 

1E 

iF 

50 

BA OO7F 
EC 

EC 

E8 F945 R 
8A E8 

B2 7C 

E8 F958 R 
48 

8B D8 

4A 

E8 F958 R 
48 

8B DO 

4B 

78 08 

E8 FOFD R 
03 DO 

4B 

79 F8 

33 DB 

8A DD 

Di £E3 

2E: 03 97 F8D6 R 
8B DA 

B2 77 


e_datal 


endp 


ROM BIOS 
Listing 


31 > Month O = Jan 
28 ; month 1 = Feb 
31 > month 2 = Mar 
30 ; month 3 = Apr 
31 ; month 4 = May 
30 ; month 5 = Jun 
31 ; month 6 = Jul 
31 ; month 7 = Aug 
30 ; month 8 = Sep 
31 ; month 9 = Oct 
30 ; month A = Nov 
31 ; month B = Dec 
Read or Write Clock Calendar Device (c_read) 


’ 


’ 


Outp 


Inpu 
Outp 


proc 


ut: 


ts 
ut: 


assume 


Save registers. 


push 
Years, 
mov 
in 
in 
call 
mov 
Months. 
mov 
call 
dec 
mov 


Days. 


dec 
call 


dec 


Calculate 


Day 


ah = -1 Write Clock Calendar Device, then: 
bx = day (from 1-1 of leap year up to 12-31 of leap year+7) 
= (0-2921) = (0-B69h) 
ch = hour (0-23) 
el = minutes (0-59) 
ah = -1 implies date/time error 
ah = 0 implies date/time OK 
ah = -2 Read Clock Calendar Device, then: 
bx = day (from 1-1 of leap year up to 12-31 of leap year+7) 
ch = hour 
cl = minutes 
dh = seconds 
dl = hundredths of seconds 
None 
near 
es:code, ds:nothing, es:nothing, ss:nothing 
ax 
dx,7Fh ; interrupts (years mod 8) 
al,dx 
al,dx 
c_rBCD ; al = years 
ch,al ; ch = saves year mod 8 
d1,07Ch ; dl = tens of months port = 7Ch 
ec_rhex ; Input: dl = tens of mon,s port = 7Ch 
; Output: ax = hex of months (1-12) 
; dx = day of week port = 7Ah 
ax ; ax = map month (1-12) to month (0-11) 
bx, ax ; bx = saves month (0-11) 
dx ; dl = tens of days port = 79h 
c_rhex ; Input dl = tens of days port = 79h 
; Output: ax = hex of days (1-7?) 
: dx = tens of hours port = 77h 
ax ; ax = map days (1-7?) to days (0-7) 
(ax has day). 
dx,ax ; dx = day 


mov 
Calculate 


dec 


js 


c_rmlp: 


call 
add 
dec 
jns 


ec_rm0d: 


Calculate 
xor 
mov 
shl 
add 
mov 


Hours. 


mov 


Mont 


Year 


h (bx has month). 


bx ; previous month 
c_rm0 ; jump if it was zero 
c_gdays ; get days per month 
dx,ax ; dx = day + current month 
bx ; previous month 
c_rmlp 

; zero case 

; dx = day + month 

(ch has month). 

bx, bx ; clear bh 
bl,ch ; get year mod 8 
bx, 1 ; make word index 


dx,word ptr cs:[(bx+e_dy_yr] 


bx, dx ; bx = day + month + year 


d1,077h . tens of hours port = 77h 


ROM BIOS 
Listing 


F926 E8 F958 R c call c_rhex ; Input: dl = tens of hours port = 77h 
Cc ; Output: ax = hexadecimal of hours 
c ; dx = tens of min.s port = 75h 
F929 8A E8 c mOV ch,al ; ch = hours 
c 
Cc ; Minutes. 
(e ; dl = tens of minutes port = 75h 
F92B. E8 F958 R c call c_rhex ; Input: dl = tens of min.s port = 75h 
c ; Output: ax = hexadecimal of minutes 
Cc H dx = tens of sec.s port = 73h 
FO92E 8A C8 c mov el,al ; el = minutes 
c 
les ; Seconds. 
c ; dl = tens of seconds port = 73h 
F930 E8 F958 R Cc call c_rhex ; Input: dl = tens of sec.s port = 73h 
(7 ; Output: ax = hexadecimal of seconds 
(a : dx = tenths of secs port = 71h 
F933 8A FO C mov dh,al ; dh = seconds 
¢ 
F935 52 c push dx ; save seconds (dh) 
Cc 
c 
Cc ; Hundredths of Seconds. 
Cc 
c ; dl = tenths of seconds port = 71h 
F936 E8 F945 R (a call e_rBCD ; al = tenths of seconds 
F939 8A EO Cc mov ah,al ; move tenths of seconds to high byte 
F93B 32 CO Cc xor al,al ; ax = BCD of hundredths of seconds 
F93D E8 F962 R Cc call c_BCD2hex ; ax = hex of hundredths of seconds 
c 
F940 5A C pop dx ; restore seconds (dh) 
F941 8A DO Cc mov dl,al ; dl = hex of hundredths of seconds 
c 
€ ; Restore registers. 
Cc 
F943 58 Cc pop ax 
F944 C3 C ret 
¢ 
F945 51 C c_rBCD: push cx ; save cx 
F946 BI 0003 Cc mov ex,3 ; try 3 times only!!! 
F949 32 F6 c xor dh, dh ; clear dh 
¢ 
F94B EC C c_rBlp: in al,dx ; get the byte 
F94C 24 OF Cc and al,OFh ; clear high nibble 
FOYE 3C OA Cc cmp al,10 ; is it less than 10? 
F950 72 04 ¢ jb c_rBret ; if so, return 
c 
F952 E2 FT c loop c_rBlp ; else, try again 
F954 BO 01 Cc mov al,1 ; if timeout, return one. 
Cc 
F956 C c_orBret: 
F956 59 (e pop ex ; restore cx 
F957 ¢3 Cc ret 
c 
F958 C c_read endp 
c 
Cc J nn nr rn rn nnn nnn 
G& Convert to Hex (e_rhex) 
c 
Cc : Inputs both BCD bytes and converts to hexdecimal word. 
Cc 3 
Cc ; Input dl = pointer to tens of whatever port 
c ; Output: ax = hexadecimal word (ah = 0) 
Ge * dx = pointer to tens of previous port (dh = 0) 
Cc 3 
Cc ; Trash: None 
ON a lel 
c 
F958 C ec_rhex proc near 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
[e3 
F958 E8 F945 R c eall e_rBCD ; in from tens of whatever 
F95B 8A EO c mov ah, al ; move tens of whatever to high byte 
FO5D 4A c dec dx ; dx points to units of whatever port 
FO95E E8 F945 R c eall e_rBCD ; in from units of whatever 
F961 4A Cc dec dx ; dx points to tens of previous port 
Cc 
Cc (3 jup short c_BCD2hex ; fall through 
c 
F962 C ec_rhex endp 
c 
CC fem w mmm mmm eee m mew me meme eee meee mere ema n wenn en seen een e een nema nm en 
Cc 3 
G 4 BCD to Hexadecimal (c_BCD2hex) 
cj 
G 4 Input ah = high BCD digit 
c . al = low BCD digit 
CG Output: ax = hexadecimal byte (ah = 0) 
Ge dh = 0 
c . Trash: None 
Cf mee nn nnn en een nn renee nner e nnn nnnnnennn mene n nn 
Cc 
F962 C ec _BCD2hex proc near 
c assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
F962 8A F4 Cc mov dh,ah ; dh = hi BCD digit 
F964 DO E6 c shl dh,1 ; dh = 2*(hi BCD digit) 
F966 DO E6 Cc shl dh,1 ; dh = 4*#(hi BCD digit) 
F968 O02 F4 c add dh,ah ; dh = 5*(hi BCD digit) 
F96A DO E6 c shl dh,1 ; dh = 10*(hi BCD digit) 


New 


F973 


F973 
F976 
F978 
FOTB 
F9TD 
F981 


F983 
F984 
F985 
F986 


F987 
F989 
F98B 


F98D 
F98F 
F991 


F994 
F996 


F999 
F99B 
F9QE 
FOQE 
F9OF 
F9AO 
F9A5 


FOAT 
F9AC 
F9AE 


F9BO 
F9B3 
F9B3 
FQOB4 
FOBT 
F9B9 


FOBB 


FOBD 
FOBF 
F9CO 


80 F9 3C 
13 73 

80 FD 18 
73 6E 

81 FB OB6A 
73 68 


50 
53 
51 
52 


33 co 
E6 70 
E6 7E 


B2 74 
8A C1 
E8 F9EC R 


8A C5 
E8 F9EC R 


8B D3 
BB 0010 


2E: 3B 97 F8D6 R 


72 FT 


2E: 2B 97 F8D6 R 


D1 EB 
8A EB 


BB FFFF 


43 

E8 FOFD R 
2B DO 

73 F8 


03 C2 


B2 78 
40 
E8 F9EC R 


42 

8B C3 

40 

E8 FOEC R 


Cc 
Cc 
c 
c 
c 
c 
Cc 
Cc 
C 
c 
Cc 
c 
c 
c 
c 
Cc 
c 
c 
C 
Cc 
c 
c 
Cc 
Cc 
c 
c 
C 
c 
Cc 
Cc 
c 
Cc 
c 
c 
Cc 
Cc 
Cc 
Cc 
c 
C 
c 
c 
c 
Cc 
C 
Cc 
Cc 
C 
Cc 
c 
C 
C 
c 
c 
Cc 
c 
C 
c 
c 
Cc 
c 
c 
c 
c 
Cc 
Cc 
c 
c 
c 
Cc 
c 
c 
c 
c 
Cc 
c 
C 
c 
c 
c 
Cc 
c 
c 
c 
c 
c 
Cc 
c 
c 
Cc 
Cc 
c 
Cc 
c 
Cc 
Cc 
c 
c 
Cc 
Cc 


add 
xor 
xor 
ret 


c_BCD2hex 


ROM BIOS 
Listing 


; al = 10®(hi BCD digit)+(low BCD digit) 
; ax = 10®(hi BCD digit)+(low BCD digit) 
>; dh = 0 


Write Clock Calendar Device 


(c_write) 


, 
; 
; Input: ah = -1 
r bx = day (from 1-1 of leap year up to 12-31 of leap year+7) 
; = (0-2921) = (0-B69h) 
; ch = hour (0-23) 
: el = minutes (0-59) 
; Output: ah = -1 implies date/time error 
. ah = 0 implies date/time OK 
; Trash None 
; EE RE SY eA |e a a jy ec is ea» Se ir a “mG |W |G in ek Qe ‘kc | jam | ts Sine Cm: eens sv) av tw em | 
C_write proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
; Check for errors. 
cmp cl1,60 ; el = minutes (0-59) 
jae c_werr 
cmp ch,24 ; eh = hour (0-23) 
jae c_werr 
emp bx, (2#366)+(6#365) ; bx = day from leap year mod 8 
jae c_werr ; = (0-2921) = (0-0B69h) 
; Save registers. 
push ax 
push bx 
push ex 
push dx 
; Initialize and Stop Clock. 
xor ax,ax ; ax = 0 
out 70h, al ; test only port = out of test mode 
out 7Eh, al ; Stop/start port = stop clock 
; Minutes. 
mov d1,074h ; dl = units of minutes port = 74h 
mov al,cl ; al = minutes (0-59) 
call c_whex ; Input: al = hexadecimal of minutes 
; dl = units of min.s port = 74h 
; Output: ax = trash 
; dx = units of hours port = 76h 
; Hours. 
; dl = units of hours port = 76h 
mov al,ch ; al = hours (0-23) 
call c_whex ; Input: al = hexadecimal of hours 
; dl = units of hours port = 76h 
; Output: ax = trash 
; dx = units of days port = 78h 
; Calculate Year. 
mov dx, bx ; dx = day from leap year mod 8 
mov bx, (8#2) ; word index of year 
c_wylp: 
dec bx 
dec bx 
emp dx,word ptr cs:[bx+ce_dy_yr] 
4b c_wylp 
sub dx,word ptr cs:[bx+c_dy_yr] ; dx = saves day of year 
shr bix:, 1 > bl = year mod 8 
mov eh, bl ; ch = saves year mod 8 


; Calculate Days & Months. 


c_wmlp: 


; Days. 


Nov 


ine 
call 
sub 
jae 


add 


mov 
ine 
call 


; Months. 


ino 
mov 
ino 
call 


bx,-1 


bx 
c_gdays 
dx,ax 
c_wmlp 


ax,dx 


d1,078h 
ax 
c_whex 


; start at January 
; next month 
; wet days per month 


; bx = month (0-11) 
; = day (0-2) 


dl = units of days port = 78h 
al = map days (0-7?) to days (1-7) 


’ 

’ 

; Input al = hexadecimal of days 

; dl = units of days port = 78h 
; Output: ax = trash 

; dx = day of week port = 7Ah 


; dl = units of months port = 7Bh 
; al = month (0-11) 

; al = map month (0-11) to month (1-12) 
; Input: al = hexadecimal of months 

: dl = units of mon.s port = 7Bh 


SSS SSS sls sss SSRIS? 


8-157 


ROM BIOS 
Listing 


F9CA 
F9CC 
FOCE 
F9D1 
F9D3 


FOD4 
F9D5 
F9D6 
F9D8 
FODA 
F9 DB 
F9DC 
FODD 
FODE 
FODF 
F9EO 


F9E1 
F9E3 
FOE4 


F9ES5 
F9E6 
F9ET 
F9EB 
F9EQ 


FOEB 
F9EB 


F9EC 


F9EC 


F9EC 
FOEE 
FOFO 


FOF2 


FOF4 
FOF6 
FOFT7 
FOF9 
FOFA 
FOFB 
FOFC 


FOFD 


FOFD 
FOFD 
FOFF 


FAO4 
FAO7 


FAO9 
FAOC 


FAOE 


33 
2E: 


80 
ihe; 


F6 
i fre. 


40 


8-158 


c5 
08 


FF 


E4 


E4 
OA 
F6 


cy 


F6 


cy 


co 
8A 87 F8E6 R 


FB 01 
06 


C5 03 
01 


ANAAANANANDANAAAANAAARAANRNAARAADAARAARAAAAANAARAAANDKDQAANANDD ARAN AANAANDANANAAANDAARAAANRAANANRAAANAAMAAMA MaMa aAaNANAAANNAANNANNNNANNNANAAaAANNaAaNnaaaannaaqtaa 


; Leap Years. 


; Years, 


> Start 


mOV 
mov 
and 
shr 
out 


ine 
ine 
mov 
or 
out 
nop 
in 
nop 
in 
nop 
in 


Clock. 
mov 


dec 
out 


al,08h 
el,ch 
c1,03h 
@l,ecl 
dx, al 


dx 

dx 
al,ch 
al,08h 
dx,al 


al,dx 
al,dx 


al,dx 


al,OFFh 
dx 
dx,al 


; Restore registers. 


. 


c_gdays 


pop 
pop 
pop 
pop 
xor 


dx 
ex 
bx 
ax 
ah,ah 


“Output: ax = trash 


dx leap year port = 7Dh 
dx = leap year port = 7Dh 

set leap year bit 

get year mod 8 

get year mod 4 

shift leap year bit into position 


TEh 
7Fh 


dx stop/start 
dx interrupt 
get year mod 8 
set ‘repeated interrupt' bit 


al OFFh 
dx stop/start = 7Eh 
start clock 


won 


ah 


" 
o 


no error 


ah error 


" 
' 
_ 


Converts hexadecimal byte to BCD and outputs both bytes. (c_whex) 


proc 
assume 


xor 
mov 
div 


xchg 


Get Days per Month. 


a 
= 
nonou 


ax destroyed. 


near 
es:code, ds:nothing, 


ah,ah 
dh,10 
dh 


al,ah 


hexadecimal byte 
pointer to units of whatever port 
pointer to units of next port (dh = 0) 


(c_gdays) 


es:nothing, ss:nothing 


ax = hexadecimal byte 

dh = divisor 

ah = remainder = low BCD digit (0-9) 
al = quotient = high BCD digit 

ah = quotient = high BCD digit 

al = remainder = low BCD digit (0-9) 


dx points to units of whatever port 
out to units of whatever 

move tens of whatever to low byte 
dx points to tens of whatever port 
out to tens of whatever 

dx points to units of next port 


This routine calculates the number of days 


per month based 


Input: 


bx = 

ch = year 

ax = days in month, 
None 

near 


es:code, ds:nothing, 


ax,ax 
al,cs:[(bx+c_dy_mo] 


bl,1 
c_gret 


ch,03h 
c_gret 


ax 


on the year without checking validity of month. 


month (assumes bx < 12) 


if month valid; else garbage 


es:nothing, ss:nothing 


clear ah 
is is February? 
if not February, return 


if year = 0 mod 4, leap year 
if not leap year, ax = 28th, so return 


load ax with February 29th 


| ROM BIOS 
| Listing 


FAOF C3 C c_gret: ret 
c 
| FA10 C c_gdays endp 
| c 
FA10 C code ends 
| Sa AAI AKAM aaa och SASH Kea Ke apie cam aeneeneemse meneame ania aeeeaisjac 
; ORG'd Font Tables 
Ci ccaca ace a cece me Ree Sema KS asm eee cach nea eseceeee se emesceeneeeeRecs 
| FA10 code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
FA6E ORG OFA6Eh 
FA6E font_lo_8x8 label byte 
C include fontlo8.asm 
c 
| FA6E C fontlo8& proc near System Font Table for M24 
Cc 
FA6E 00 00 00 00 c DB 00h,00h,00h,00h 
| FA7T2 00 00 00 00 c DB 00h,00h,00h,00h H 0 
| FA76 7E 81 AS 81 Cc DB O7eh,081h,0a5h,081h 
FATA BD 99 81 7E Cc DB Obdh,099h,081h,07eh ; 1 
| FATE 7E FF DB FF Cc DB O7eh,Offh,Odbh,Offh 
FA82 C3 ET FF TE Cc DB Oc3h,0e7h,0ffh,O07eh ; 2 
| FA86 36 7F 7F 7F Cc DB 036h,07fh,O07fh,07fh 
FA8A 3E 1C 08 00 C DB 0O3eh,01ch,08h,00h ; 3 
FA8E 08 1C 3E 7F C DB 08h,01ch,03eh,07fh 
FA92 3E 1C 08 00 C DB O03eh,01ch,08h,00h A 4 
| FA96 18 3C ET ET Cc DB 018h,03ch,0e7h,0e7h 
| FAQ9A 66 18 18 3C Cc DB 066h,018h,018h,03ch ; 5 
FAQ9E 18 3C 7E FF c DB 018h,03ch,07eh,0ffh 
FAA2 FF 7E 18 3C c DB Offh,07eh,018h,03ch ; 6 
FAA6 00 00 18 3C c DB 00h,00h,018h,03ch 
FAAA 3C 18 00 00 Cc DB 03ch,018h,00h,00h H T 
FAAE FF FF ET C3 Cc DB Offh,Offh,0e7h,0c3h 
FAB2- C3 E7 FF FF c DB Oc3h,0e7h,0ffh,Offh ; 8 
FAB6 00 3C 24 42 c DB O00h,03ch,024h,042h 
FABA 42 24 3C 00 c DB O42h,024h,03ch,00h_ ; 9 
FABE FF C3 99 BD € DB Offh,0c3h,099h,0bdh 
FAC2 BD 99 C3 FF Cc DB Obdh,099h,0c3h,0ffh ; a 
FAC6 1F O07 OD 19 C DB O1fh,07h,0dh,019h 
| FACA 78 CC cc 78 Cc DB 078h,0cch,0cch,078h ; b 
{ FACE 3C 66 66 3C Cc DB 03ch,066h,066h,03ch 
FAD2 18 7E 18 18 Cc DB 018h,07eh,018h,018h ; e 
FAD6 18 14 12 12 Cc DB 018h,014h,012h,012h 
FADA 14 70 FO 60 c DB 014h,070h,0f0h,060h ; d 
FADE 1F 11 1F 11 c DB O1fh,011h,01fh,011h 
FAE2 13 37 72 20 Cc DB 013h,037h,072h,020h ; e 
FAE6 18 DB 3C ET c DB 018h,0dbh,03ch,0e7h 
FAEA 3C DB 18 00 c DB O3ch,0dbh,018h,00h_ ; f 
FAEE 40 70 7C 7F Cc DB O40Oh,070h,07ch,07fh 
FAF2 7C 70 40 00 c DB O7ch,070h,040h,00h_ ; 10 
FAF6 01 07 1F 7F c DB O1h,07h,01fh,07fh 
FAFA 1F O07 01 00 Cc DB O1fh,07h,01h,00h ; 11 
FAFE 18 3C 7E 18 Cc DB 018h,03ch,07eh,018h 
FBO2 18 7E 3C 18 c DB 018h,07eh,03ch,018h ; 12 
FB06 00 33 33 33 Cc DB 00h,033h,033h,033h 
FBOA 33 00 33 00 Cc DB 033h,00h,033h,00h ; 13 
FBOE 7F DB DB 7B Cc DB O7fh,Odbh,Odbh,0O7bh 
FB1i2 1B 1B 1B 00 Cc DB O1bh,01bh,01bh,00h_ ; 14 
FB16 3E 61 3C 66 Cc DB 03eh,061h,03ch,066h 
FB1A 66 3C 86 7C c DB 066h,03ch,086h,07ch ; 15 
FB1E 00 00 00 00 c DB O00h,00h,00h,00h 
FB22 T7E TE TE 00 c DB O7eh,O7eh,O7eh,00h_ ; 16 
FB26 18 3C 7E 18 C DB 018h,03ch,07eh,018h 
FB2A 7E 3C 18 7E c DB O7eh,03ch,018h,07eh ; VT 
FB2E 18 3C 7E 18 Cc DB 018h,03ch,07eh,018h 
FB32 18 18 18 18 Cc DB 018h,018h,018h,018h ; 18 
FB36 18 18 18 18 c DB 018h,018h,018h,018h 
FB3A 18 7E 3C 18 c DB 018h,07eh,03ch,018h ; 19 
FB3E OC 06 7F 06 Cc DB Och,06h,07fh,06h 
FB42 OC 00 00 00 c DB Och,00h,00h,00h ; la 
FB46 18 30 7F 30 c DB 018h,030h,07fh,030h 
FBYA 18 00 00 00 C DB 018h,00h,00h,00h ; 1b 
FBYE 00 00 60 60 c DB 0O0h,00h,060h,060h 
FB52 60 7F 7F 00 C DB 060h,07fh,07fh,00h_ ; ic 
FB56 00 24 66 FF Cc DB 00h,024h,066h,0ffh 
FB5A 66 24 00 00 Cc DB 066h,024h,00h,00h ; 1d 
FB5E 00 00 18 3C c DB O00h,00h,018h,03ch 
FB62 7E FF 00 00 Cc DB O7eh,Offh,00h,00h ; le 
FB66 00 FF 7E 3C Cc DB O0Oh,Offh,07eh,03ch 
FB6A 18 00 00 00 c DB 018h,00h,00h,00h ; 1f£ 
FB6E 00 00 00 00 Cc DB 00h,00h,00h,00h 
| FB72 00 00 00 00 Cc DB 00h,00h,00h,00h st D210 
| FB76 18 3C 3C 18 C DB 018h,03ch,03ch,018h 
FB7A 18 00 18 00 C DB 018h,00h,018h,00h Se 2 
FB7TE 36 36 14 00 Cc DB 036h,036h,014h,00h 
FB82 00 00 00 00 C DB 00h,00h,00h,00h gn. 22 
FB86 36 36 7F 36 c DB 036h,036h,07fh,036h 
FB8A 7F 36 36 00 Cc DB O7fh,036h,036h,00h ;'#' 23 
FB8E 18 3E 60 3C Cc DB 018h,03eh,060h,03ch 
FB92 06 7C 18 00 Cc DB 06h,07ch,018h,00h pret 24 
FB96 00 63 66 OC Cc DB 0O0h,063h,066h,0ch 
FB9A 18 33 33 00 C DB 018h,033h,033h,00h 3;'%!' 25 
FB9E 1C 36 1C 3B C DB 0O1ch,036h,01¢ch,03bh 
FBA2 6E 66 3B 00 c DB 06eh,066h,03bh,00h ;'&' 26 
FBA6 18 18 30 00 c DB 018h,018h,030h,00h 
FBAA 00 00 00 00 Cc DB 00h,00h,00h,00h eee 20 
FBAE OC 18 30 30 c DB Och,018h,030h,030h 
FBB2 30 30 18 0C C DB 030h,030h,018h,0ch ;'(' 28 


ROM BIOS 
Listing 


FBB6 30 
FBBA OC 
FBBE 00 
FBC2 3C 
FBC6 00 
FBCA 18 
FBCE 00 
FBD2 00 
FBD6 00 
FBDA 00 
FBDE 00 
FBE2 00 
FBE6 03 
FBEA 30 
FBEE 3E 
FBF2 78 
FBF6 OC 
FBFA OC 
FBFE 1F 
FCO2 18 
FCO6 1E 
FCOA 03 
FCOE OE 
FOKe TE 
FC16 3F 
FCIA 03 
FCIE OE 
FC22 33 
FC26 3F 
FC2A OC 
FC2E 1E 
FC32 33 
FC36 1E 
FC3A 03 
FC3E 00 
Fc42 00 
FC46 00 
FC4A 00 
FCHE 06 
Fc52 18 
FC56 00 
FC5SA 00 
FC5E 30 
FC62 OC 
FC66 3E 
FC6A OC 
FC6E 3E 
FCT2 6E 
FC76 08 
FC7A TF 
FCT7TE TE 
FC82 33 
FC86 1E 
FC8A 61 
FC8E 7C 
FC92 33 
FC96 7F 
FC9A 34 
FC9E 7F 
FCA2 34 
FCA6 1E 
FCAA 67 
FCAE 63 
FCB2 63 
FCB6 3C 
FCBA 18 
FCBE OF 
FCC2 66 
FCC6 73 
FCCA 3C 
FCCE 78 
FCD2 30 
FCD6 63 
FCDA 63 
FCDE 63 
FCE2 67 
FCE6 1C 
FCEA 63 
FCEE 7E 
FCF2 30 
FCF6 1C 
FCFA 63 
FCFE 7E 
FDO2 36 
FD06 3E 
FDOA 06 
FDOE TE 
FD12 18 
FD16 63 
FDIA 63 
FDIE 63 
FD22 36 
FD26 63 
FD2A 6B 
FD2E 63 
FD32 36 
FD36 66 
FD3A 18 
FD3E 7F 
FD42 18 


ANMANADANAANDNDANMA ANA AAANDMDAANANAMD MD ANMNAAANA AMA ANAND ANAANNDANANANNAANANANAMNAADAANANAANNNNAMAAAANMAAMNAANNANNNMNAAMANMNANMAANAAAnNAANANAaAANAANANANAAANNA 


030h,018h,Och,0Och 
Och,0ch,018h,030h 
00h,066h,03ch,0ffh 
03ch,066h,00h,00h 
00h,018h,018h,07eh 
018h,018h,00h,00h 
00h,00h,00h,00h 
00h,018h,018h,030h 
00h,00h,00h,07eh 
00h,00h,00h,00h 
00h,00h,00h,00h 
00h,018h,018h,00h 
03h,06h,0ch,018h 
030h,060h,040h,00h 
03eh,063h,067h, 06fh 
07bh,073h,03eh,00h 
Och,O01ch,0ch,Och 
Och,0ch,03fh,00h 
01fh,033h,03h,0eh 
018h,033h,03fh,00h 
01eh,033h,03h,0eh 
03h,033h,01eh,00h 
Oeh,01eh,036h,066h 
07fh,06h,0fh,00h 
03fh,030h,03eh,03h 
03h,033h,01eh,00h 
Oeh,018h,030h,03eh 
033h,033h,01eh,00h 
03fh,033h,03h,06h 
Och,Och,0Och,00h 
01eh,033h,033h,01eh 
033h,033h,01eh,00h 
01eh,033h,031h,01fh 
03h,06h,01ch,00h 
00h,018h,018h,00h 
00h,018h,018h,00h 
00h,018h,018h,00h 
00h,018h,018h,030h 
06h,0ch,018h,030h 
018h,0ch,06h,00h 
00h,00h,07eh,00h 
00h,07eh,00h,00h 
030h,018h,0ch,06h 
O0ch,018h,030h,00h 
03eh,063h,03h,06h 
Och,00h,0ch,00h 
03eh,063h,06fh,06fh 
06eh,060h,03eh,00h 
08h,01ch,036h,063h 
O7fh,063h,063h,00h 
07 eh, 033h,033h,03eh 
033h,033h,07eh,00h 
01eh,033h,060h,060h 
061h,033h,01eh,00h 
07ch,036h,033h,033h 
033h,036h,07ch,00h 
07fh,031h,034h,03ch 
034h,031h,07fh,00h 
O07fh,031h,034h,03ch 
034h,030h,078h,00h 
01eh,033h,060h,060h 
067h,033h,01dh,00h 
063h,063h,063h,07fh 
063h,063h,063h,00h 
03ch,018h,018h,018h 
018h,018h,03ch,00h 
Ofh,06h,06h,06h 
066h,066h,03ch,00h 
073h,036h,03ch,038h 
03ch,036h,073h,00h 
078h,030h,030h,030h 
030h,033h,07fh,00h 
063h,077h,07fh,06bh 
063h,063h,063h,00h 
063h,073h,07bh,06fh 
067h,063h,063h,00h 
O1ich,036h,063h,063h 
063h,036h,01ch,00h 
07eh,033h,033h,03eh 
030h,030h,078h,00h 
01ch,036h,063h,063h 
063h,036h,01ch,07h 
07 eh, 033h,033h,03eh 
036h,033h,033h,00h 
03eh, 063h,030h,018h 
06h,063h,03eh,00h 
O07eh,05ah,018h,018h 
018h,018h,03ch,00h 
063h,063h,063h,063h 
063h,063h,03eh,00h 
063h,063h,063h,063h 
036h,01ch,08h,00h 
063h,063hb,063h,06bh 
06bh,07fh,036b,00h 
063h,063h,036h,01ch 
036h,063h,063h,00h 
066h,066h,066h,03ch 
018h,018h,03ch,00h 
07fh,063h,06h,0ch 
018h,033h,07fh,00h 


2 ng? 


stg) 


. . 
’ ’ 


37 
38 
39 


5a 


FD46 

FD4A 

FD4E 

FD52 

FD56 

FD5A 
| FD5E 
| FD62 
| FD66 

FD6A 

FD6E 
| FD72 
| FD76 
| FDT7A 
| FD7E 
FD82 
FD86 
FD8A 
FD8E 
| FD92 
FD96 
FD9A 
FD9E 
FDA2 
FDA6 
FDAA 
FDAE 
FDB2 
| FDB6 
| FDBA 
FDBE 

FDC2 
| FDC6 
FDCA 
FDCE 
FDD2 
FDD6 
FDDA 
FDDE 
FDE2 
FDE6 
FDEA 
FDEE 
FDF2 
FDF6 
FDFA 
FDFE 
FEO2 
FE06 
FEOA 
FEOE 
FE12 
FE16 
FE1A 
FE1E 
FE22 
FE26 
FE2A 
FE2E 
FE32 
FE36 
FE3A 
FE3E 
FE42 
FE46 
FEYA 
FEYE 
FE52 
FE56 
FE5A 
FE5E 
FE62 
FE66 
FE6A 


FE6E 


FE6E 


FE6E 


AA DAQDOAVIEIOGADNIUAA VOW GAAIAOAVGAGAUAAAGAMUGOUAASADSTSOADSEGHAAAGDADAEAAOAEGSHSEOEOA6GHE6GEOHOES 
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;End of 
fontlo8 


code 


font 
endp 


ends 


rte. 


03ch,030h,030h,030h 
030h,030h,03ch,00h 
020h,030h,018h,0ch 
06h,03h,01h,00h 
03ch,0ch,0ch,0ch 
Och,0ch,03ch,00h 
08h,01ch,036h,063h 
00h,00h,00h,00h 
00h,00h,00h,00h 
00h,00h,07fh,00h 
018h,018h,0ch,00h 
00h,00h,00h,00h 
00h,00h,03ch,06h 
03eh,066h,03bh,00h 
070h,030h,03eh,033h 
033h,033h,06eh,00h 
00h,00h,03eh,061h 
060h,061h,03eh,00h 
Oeh,06h,03eh,066h 
066h,066h,03bh,00h 
00h,00h,03eh,063h 
O7fh,060h,03fh,00h 
01eh,033h,030h,07ch 
030h,030h,078h,00h 
00h,00h,03bh,066h 
066h,03eh,046h,03ch 
070h,030h,036h,03fh 
033h,033h,073h,00h 
Och,00h,01ch,0ch 
Och,Och,01eh,00h 
Och,00h,01eh,0ch 
Och,O0cch,0cch,078h 
070h,030h,033h,036h 
03ch,036h,073h,00h 
O1ch,0ch,0ch,0ch 
Och,0ch,01eh,00h 
00h,00h,066h,07fh 
06bh,06bh,06bh,00h 
00h,00h,06eh,033h 
033h,033h,033h,00h 
00h,00h,01eh,033h 
033h,033h,01eh,00h 
00h,00h,06eh,033h 
033h,03eh,030h,078h 
00h,00h,03bh,066h 
066h,03eh,06h,0fh 
00h, 00h, 06eh,03bh 
030h,030h,078h,00h 
00h,00h,03fh,060h 
03ch,03h,07eh,00h 
08h,018h,03eh,018h 
018h,01bh,0eh,00h 
00h,00h,066h,066h 
066h,066h,03bh,00h 
00h,00h,063h,063h 
036h,01ch,08h,00h 
00h,00h,063h,06bh 
06bh,07fh,036h,00h 
00h, 00h, 063h,036h 
01¢ch,036h,063h,00h 
00h,00h,066h,066h 
066h,03eh,06h,07ch 
00h,00h,07eh,04ch 
018h,032h,07eh,00h 
Oeh,018h,018h,070h 
018h,018h,0eh,00h 
018h,018h,018h,00h 
018h,018h,018h,00h 
070h,018h,018h,0eh 
018h,018h,070h,00h 
03bh,06eh,00h,00h 
00h,00h,00h,00h 
00h,08h,01ch,036h 
063h,063h,07fh,00h 
matrix 


asn 


File 


name: rtc.sre 


’ 


’ 


, 


, 


5b 
5¢ 
5d 
5e 
5f 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
6a 
6b 
6c 
6d 
be 
6f 
70 
1 
72 
73 
74 
5 
76 
TT 
78 
19 
Ta 
Td 
Te 
7d 
Te 
TE 


This module includes INT 08h & 


segm 


assume 


INT 


Inpu 
Outp 


ent public 'ROM'! 


t: ah = 
ut: ex = 
dx = 
al = 


es:code, ds:nothing, 


es:nothing, 


OQ Read the Clock, 
High Portion of Clock (t_hi_order) 
Low Portion of Clock (t_low_order) 
1 if 24 hours have elapsed (t_overflow); 


1Ah. 


then; 


ss:nothing 


ROM BIOS 
Listing 


1Ah -- Time of Day Software Interrupt Request Routine 


0 otherwise 


rere sre ee er LS Se SS SS SS SSS SS SSS SSS SS Sa SSS EES 


8-161 


ROM BIOS 


Listing 
Cc 
Cc ; Input: ah = 1 Set the Clock, then: 
G ex = High Portion of Clock (t_hi_order) 
Gc 4 dx s Low Portion of Clock (t_low_order) 
Cc 
c  ¥ Trash ah = (ah - 1) if ah <> 0,-1, or -2 
Cc pT SS SSSS SSS SS STS SSS SS SS SHS SSSSSSSS SS SSSSSSSSSSssrsrsrsrSssssssssessesesze 
Cc ; Input ah = -1 Write Clock Calendar Device, then: 
G4 bx = day (from 1-1 of leap year up to 12-31 of leap year+7) 
© * = (0-2921) = (0-B69h) 
c 4 ch = hour (0-23) 
G 3 el = minutes (0-59) 
Cc : Output: ah = -1 implies date/time error 
Cc : ah = 0 implies date/time OK 
Cc 
c : Input: ah = -2 Read Clock Calendar Device, then: 
C3 Output: bx = day (from 1-1 of leap year up to 12-31 of leap year+7) 
C R ch = hour 
Cc R el «= minutes 
Cc ; dh = seconds 
Cc H dl = hundredths of seconds 
Cc; 
Cc : Trash None, 
Cc PSE SS SS SSS SSS SS SSS SSS SSS SSSS SSS SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSTSSTTrsssste 
c 

FE6E Cc ORG OFE6Eh 
Cc 

FE6E C t_day proc near 
64 assume cs:code, ds:nothing, es:nothing, ss:nothing 
c 

FE6R FB C sti ; enable interrupts 
Cc 

FE6F 80 FC FE Les cmp ah,OFEh ; ZF set if FEh, CF reset if FFh 

FET2 75 O04 Cc jne t_nFE ; ah = -2 = OFEh 7? 

Cc 

FET4 E8 F8F2 R c call c_read ; read calendar chip 

FETT CF c iret 

FE78 Cc t_nFE: 

Cc 

FE78 72 04 c jb t_nFF ; ah = -1 = OFFh > OFEh ? 
c 

FETA E8 F973 R Cc call c_write ; set calendar chip 

FETD CF Cc iret 

FETE C t_nFF: 

GC 
C assume cs:code, ds:data, es:nothing, ss:nothing 
Cc 

FETE 1E c push ds ; Save registers 

FE7F E8 ESF4 R c call set_ds ; satisfy assumptions 
Cc 

FE82 FA (3 eli ; interrupts off! 

(4 ; (shared variables) 
C 

FE83 80 EC 01 ¢ sub ah,1 ; DON'T DECREMENT (CF needed!) 

FE86 73 OD GC jae t_set ; ah = 0 < 12 
Cc 
Cc ; Read Time of Day. 

Cc 

FE88 32 E4¥ ¢C xor ah,ah ; ah = 0 & ZF set! 

FE8A 8B OE OO6E R Cc mov ex,word ptr ds:[{t_hi_order] 

FE8E 8B 16 OO6C R c mov dx,word ptr ds:[t_low_order] 

FE92 AO 0070 R c mov al, byte ptr ds:[t_overflow] ; t_overflow = 0 by setting time! 
c ; fall through (ah = 0 & ZF set) 
¢ 

FE95 75 0C C t_set: jnz t_end ; was ah = 1? (is ah = 0 now)? 
Cc 
C ; Set Time of Day. 

Cc 

FE97 89 OE OO6E R C mov word ptr ds:[(t_hi_order],cx ; it's ok, if we fell through. 

FE9B 89 16 OO6C R C mov word ptr ds:[t_low_order],dx ; (a bit slower, but smaller!) 

FE9F 88 26 0070 R Cc mov byte ptr ds:[t_overflow],ah ; ah = 0 (in all cases...) 
Cc 

FE A3 1F C t_end: pop ds ; restore registers 

FEAN CF C iret 
c 

FEA5 C t_day endp 
Cc 
c pS SSS SSS SSS SSS SSS SSS SSS SSS SSS SSS SSeS esses sSsessessssssssersssssrssssssszsse 
Cc ‘ INT 08h -- 18253 p_timer Hardware Interrupt Service Routine 
Cc PTS SSSSSSS SSS SSS SS SS SSSSSTSSSSSSSSssSssssssssssssrssssssssssssssssesseee 
¢} 

FEAS5 c ORG OFEA5h 
Cc 

FE A5 C t_int proc near 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
Cc 
Cc ; interrupts off! 
le ; (shared variables) 

Cc 

FEAS 50 c push ax ; preserve registers 

FEA6 52 c push dx 

FEAT 1E Cc push ds 
Cc 
Cc assume cs:code, ds:data, es:nothing, ss:nothing 
c 

FEA8 2E: 8E 1E E5F2 R Cc mov ds,word ptr cs:[set_ds_word] ; satisfy assumption 
Cc 
C ; Handle turning off floppy disk drive motor, 

c 
FEAD FE OE 0040 R c dec byte ptr ds:[motor_count] ; decrement motor on count 


8-162 


ROM BIOS 
Listing 


FEB1 75 08 jnz t_ine ; should we turn off drive? 
FEB3 E8 EF4F R eall stop_disk ; if so, stop disk motor 
FEB6 80 26 003F R FO and byte ptr ds:[motor_status],0FOh ; clear low nibble of status 


FEBB t_ine: 


; Increment long p_timer count 


FEBB FF 06 OO6C R ine word ptr ds:[t_low_order] ; increment low byte of counter 
FEBF 75 04 jnz thi ; skip t_hi_order 
FEC1 FF 06 OO6E R ine word ptr ds:[t_hi_order] ; increment high byte of counter 


FEC5 


; Handle 24 hour overflow situation 


FEC5 81 3E 006C R OOBO emp word ptr ds:[{t_low_order],00BOh ; has 24 hours elapsed? 
FECB 75 14 jne t_ofl ; if not, skip t_overflow 
FECD 83 3E OO6E R 18 emp word ptr ds:[t_hi_order],24 ; has 24 hours elapsed? 
FED2 75 OD jne t_ ofl ; if not, skip t_overflow 
FED4 C6 06 0070 R 01 mov byte ptr ds:[t_overflow],01h 

FED9 33 CO xor ax,ax 

FEDB A3 OO6C R Mov word ptr ds:[t_low_order],ax 

FEDE A3 0O06E R mov word ptr ds:[({t_hi_order],ax 

FEE1 t_ofl: 

FEE1 FB sti ; enable interrupts 


; (no more shared variables) 
; Invoke any user p_timer break routine. 
FEE2 CD 1C INT 1Ch 


; Send specific end of interrupt (SEOI) to pic ‘“command' port AFTER p_timer 
; break, because user may be out-to-lunch for quite awhile.... 


PFPEMAAIAVAARAAAAAAAANAAAANAAAANAAARAARDAAANAAAAAAAAAAAAAAAAaQGaaAaAaaAaaa 


FEE4 BO 60 Mov al, pic_seoi_0 ; specific end of interrupt command 
f~ FEE6 £E6 20 out pic_0,al ; to pic ‘command port. 
FEE8 1F pop ds ; restore registers 
FEE9 5A pop dx 
FEEA 58 pop ax 
FEEB CF iret 
FEEC tint endp 
FEEC code ends 
include vector.asm 
PSSST SSS SSS SSS SSS SSS SSS SSS SSS SS SS SSS sssssHes ses sssSsssssssssssssessssssat 
: Filename: vector.src 
; 
; This module includes the table of ROM interrupt vectors & LiL int 
; hardware diagnostic & illegal software interrupt service routine. 
; 
SSSSSSSHPSSSSSSSSSSSSSSSSHSSSSSSSSSSESSSSTPTSessSssstreseszeezresez2zeeeserre==e 
05-11-84 
c 
FEEC C code segment public 'ROM'! 
Cc assume cs:code, ds:nothing, es:nothing, ss:nothing 
c 
FEF3 Cc ORG OFEF3h 
Cc 
FEF3 C i_vec_tbl proce near 
Cc 
FEF3 FEA5 R Cc dw t_int ; intO8locn see rtc.sre 
FEF5 £987 R c dw k_int ; intO9locn see kb.sre 
FEF7 FF23 R Cc dw T12. int ; intOAlocn 
FEF9 FF23 R c dw ill_int ; intOBlocn 
FEFB FF23 R C dw ill_int ; intOClocn 
FEFD FF23 R c dw £21 int ; intODlocn 
FEFF EF57 R Cc dw fd_int ; intOElocn see dsk.srec 
FFO1 FF23 R c dw LL tat ; intOFlocn 
c 
FFO3 F065 R Cc dw v_io ; int10loen see vid.sre 
FFO5 F84D R Cc dw m_equip ; intiillocn see mem.src 
FFO7 F841 R c dw m_size ; inti2locn see mem.src 
FFO9 EC59 R C dw fd_io ; int1i3locn see dsk.srec 
FFOB E739 R Cc dw serial_io ; inti4locn see com.sre 
FFOD F859 R C dw m_cass ; int15locn see mem.src 
FFOF E82E R Cc dw k_io ; int16locn see kb.sre 
FF11 EFD2 R Cc dw p_io ; int17locn see prn.sre 
C 
FF13 F860 R c dw bt_int ; int18locn (We Don't Have BASIC!) 
FF15 F860 R c dw bt_int ; int19locn see boot.sre 
FF17 FE6E R C dw t_day ; int1Aloen see rte.sre 
FF19 FF4B R Cc dw dummy_iret ; int1iBloen see kb.sre 
FF1B FF4B R C dw dummy_iret ; intiClocn see rtec.sre 
FF1D FOA4 R Cc dw v_parms ; int1Dlocn see vid.sre 
FF1F EFC7 R c dw fd_parms ; int1Elocn see dsk.sre 
FF21 C860 R Cc dw font_hi_8x8 ; int1Flocn see graph.srec 
c 
FF23 C i_vee tbl endp 
Cc 
CC jeer een nee nn nn en en ee ee eee ee eee 
c H Interrupt Routine for Unused Hardware & Illegal Software Interrupts 


LS TSE LE TELE STE ETT TE ESE I LE ELE TE DOE IE AE EOS EES LOL AE IIE SESE ITE IELTS CT DE II IE IO PE A ELEC EG EE GEE ETE TTE OEE DICTA OEE 
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Listing 


FF23 

FF23 

FF23 50 

FF24 B8 FFOB 
FF27 £6 20 
FF29 1E 

FF2A E4 20 
FF2C OA CO 
FF2E 74 OE 
FF30 8A EO 
FF32 E4 21 
FF34 OA C4 
FF36 £6 21 
FF38 BO 20 
FF3A £6 20 
FF3C EB 03 
FF3E 

FF3E E8 ES5S8C R 
FFA 

FF41 E8 ESF4 R 
FFY4 88 26 006B R 
FF48 1F 

FF49 58 

FF4YA CF 

FFUB 

FFUB 

FF4B 

FF4UB CF 

FF4C CF 

FF4D CF 

FFUE CF 

FF4F CF 

FF50 CF 

FF51 CF 

FF52 CF 

FF53 CF 

FF54 

FF54 

FF54 
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assume 
ORG 

ill_int proc 
push 


DOV 
out 


push 


es:code, ds:nothing, 
OFF23h 

near 

ax 


ax, (OFFh#®100h)+0Bh 
pic_0,al 


ds 


es:nothing, 


ss:nothing 


trap for illegal interrupts 


save registers 

ah = -1; illegal software trap 
al = OCW3 -- read PIC's 
in-service register 


save registers & delay 


; Determine whether it is a hardware or software interrupt. 


in 
or 


jz 


; If hardware interrupt, 


mov 
in 
or 
out 


mov 
out 


al, pic_0O 
al,al 
i1ll_sw 


ah,al 
al, ple 
al,anh 
pic_1,al 


al, pic_neoi 
pic_0O,al 


’ 
’ 


’ 


get active PIC IR# 
are any active? 
if not, illegal software trap. 


disable the 8259 PIC from further interrupts. 


return active PIC IR# 

OCW1 -- get PIC interrupt mask 
shut off (set) IR# bit. 

send PIC new mask. 


OCW2 -- send PIC a 
nonspecific end_of_int 


; Return ah = active PIC Interrupt Number in intr_flag. 


jmp 


ill_sw: 


’ 


short ill_flg 


Turn off floppy disk drives and notify user 


illegal software trap; ah = -1 


call ill_trap ; every register but ds saved! 
»List 

assume cs:code, ds:nothing, es:nothing, ss:nothing 
LD fle ; set illegal trap flag. 

; illegal software trap; ah = -1 

assume cs:code, ds:data, es:nothing, ss:nothing 

call set_ds ; satisfy assumptions. 

mov byte ptr ds:(intr_flag],ah ; return interrupt flag. 

pop ds ; restore registers. 

pop ax ; give user a second chance 

iret 


ill_int endp 


assume ecs:code, ds:nothing, es:nothing, ss:nothing 
ORG OFF4Bh ; ORG OFF4Bh through OFF53h 
dummy_iret proc near ; “BREAK' key interrupt (1Bh) 
iret ; p_timer break interrupt (1Ch) 
iret ; OFF4Ch -- in case someone is 
iret 3; OFF4Dh 
iret ; OFF4En 
iret ; OFF4Fh 
iret ; OFF50h 
iret ; OFF51h 
iret ; OFF52h 
iret ; OFF53h 
dummy_iret endp 
code ends 


include prnscr.asm 


Filename: prnscr.src 


; This module includes INT 05h. 
H 


code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 


INT 05h -- Print Screen 


’ 
’ 
H Input: None. 

; Output: None. 

H Trash: None. (Uses byte at 50:0 = 40:0100 as monitor lock: 
. 0 indicates monitor not locked. 

; 1 indicates monitor locked. 

; -1 indicates printer error. 


ROM BIOS 
Listing 


FF54 


FF54 


FF54 


FF55 


FFSA 
FF5B 
FF5D 
FF62 
FF64 
FF66 


FF67 
FF68 
FF69 


FF6A 
FF6C 


FF6E 


1E 


2E: 


52 
B2 


FO/ 86 


FE 
74 
FB 


51 
53 
50 


BY 
CD 


8A 


By 


E8 
15 


8E 1E E5F2 R 


01 


CA 
4C 


OF 
10 


DC 


EB 


FF 


0000 


FFB5 R 
24 


FFC9 R 


00 
02 
20 


FE 19 


OE 0100 


16 0100 


PPE OE ESE AIO ESOS AAA OAS SOE SHS GeO ash eaN Seo SO Oke anaes OSaeneaeanoanndamead ea cee Sewn 


ORG OFF54h 
s_int proc near 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
push ds > save ds 
assume cS:code, ds:data, es:nothing, ss:nothing 
mov ds,word ptr cs:[set_ds_word] ; satisfy assumptions 
push dx 
mov dl.;.1 5 1 = locked 
lock xchg byte ptr ds:[({100h],dl ; check monitor lock 
dec dl ; already locked ? 
jz S_nop ; if set, do nothing 
sti ; enable interrupts after 
; monitor lock codel!!! 
push ex ; Save registers 
push bx 
push ax 


; Get Current Video Width. 


mov ah,OFh 
INT 10h 
mov bl,ah 


; Get Current Cursor Position. 


mov ah,O3h 
INT 10h 
mov ch, bl 
push dx 

mov el,-1 


5 Loop Through the Screen, 


mov dx,0 

eall s_eol 

jnz s_err 
s_lp: eall s_get 


; Map Invalid Characters to Space. 


cmp al,0 
jne s_ok 
mov ai 


> Print the Character. 


eall s_out 
jnz s_err 


3 Advance to Next Character. 


ine dl 

emp dl,ch 

Kiel s_lp 

eall s_eol 

jnz s_err 

xor dl,dl 

ine dh 

emp dh,25 

pe s_lp 

xor cx, cx 
; jmp short s_err 
s_err: pop dx 

mov ah,02h 

INT 10h 

sti 

mov byte ptr ds:[(100h],cl 

pop ax 

pop bx 

pop cx 
S_nop: pop dx 

pop ds 

iret 


’ 
’ 
, 
, 
’ 


call v_video_state 


Output: ah = ert_cols 

al = ert_mode 

bh = active_page 
save ah = ert_cols 


call v_read_cursor 
Input: bh = active_page 


Output: 
(dh,dl) = (row,col) of cursor 
(ch,cl) = cursor mode setting 


;e6et ert_cols 


? 


’ 


we ee ee ee 


save row, col of cursor 
initialize cl = printer error 


(dh,dl) = (row,col) of origin 


print a new line 
any errors? 


get next character from screen 


check validity of character. 
if valid, we're ok. 
if invalid, print a space. 


any errors? 


advance column (1-ert_cols) 
dl < ch = ert_cols? 
if so, continue 


else print a new line 
any errors? 


move column back to 0 
advance row (1-25) 

dh < 25 

if so, continue 


set cl = printer no error 
fall through 


restore dx=(row,col) of cursor 
call v_set_cpos 

Input: bh = active_page 

dx =(row,col) of cursor 
disable interrupts during 
monitor lock code!!!! 

reset monitor lock 


restore registers 
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1 SRS ves SSE ee ESR DIST EIT ETT EE DIE EEL EL EEE TLE I 


FFB5 BO OA C s_eol: mov al,LF ; print LF & CR 
FFB7 E8 FFBC R c call s_out 
FFBA BO OD C mov al,CR ; print CR 
c ‘ jmp short s_out ; fall through 
c 
FFBC C s_out: ; prints out byte in al 
FFBC 52 c push dx ; Bave dx 
FFBD BA 0000 ¢ mov dx,0 ; address printer port 0. 
FFCO B4 00 Cc mov ah,O ; write byte to port 0 
FFC2 CD 17 c INT 17h 
FFC4 5A c pop dx ; restore dx 
CG 4 test ah,025h ; test for any errors? 
FFCS F6 C4 01 c test ah,OOth ; test for time out? 
FFC8 C3 c ret 
FFC9 C s_get: ; Set Cursor Position and get character @ curs, position 
Cc 
FFC9 B4 02 Cc mov ah,O2h ; call v_set_cpos 
FFCB CD 10 Cc INT 10h ; Input: bh = active_page 
(6 : dx =(row,col) of cursor 
c ; Read Character at Cursor Position. 
c 
FFCD B4 08 Cc mov ah,O8h ; call v_read_ac_current 
FFCF CD 10 c INT 10h ; Input: bh = active_page 
Cc ; Output: al = character read 
FFD1 C3 C ret H ah = attribute 
c 
FFD2 ¢ s_int endp 
Cc 
FFDe C code ends 
: CPU System Reset Vector 
FFDe code segment public 'ROM' 
assume cs:code, ds:nothing, es:nothing, ss:nothing 
FFFO ORG OFFFOh ; FOOO:FFFO = FFFFO = FFFF:0000 
FFFO vector proc near 
FFFO EA db OE Ah ; jmp intersegment FOOO:(offset diagnostics_1) 
FFF1 DDSA R dw diagnostics_1 ; instruction pointer es:(offset diagnostics_1) 
FFF3 FOOO dw code_seg ; code segment FOOOh 
FFF5 30 35 2F 30 33 2F db "05/03/84! ; release marker (exactly 8 bytes!!!!) 
38 34 
FFFD 00 chk_hi db 0 ; space for checksum of FO00:E000 to FOOO:FFFF 
FFFE vector endp near 
FFFE code ends 
end 
Macros: 
Name Length 
ENPORT 3 & «© «© % «© © % @ © # om « 0005 
JMPE 4 & oe & 2 wwe He a mw ww 8 0001 
OUTPORTs. <@ or i Se om. “® om. Wo Re we 0005 
Structures and records: 
Name Width # fields 
Shift Width Mask Initial 
GDB 2%. i ke ae a ay! aR ae rw 0008 0003 
CEPs xe. Be es oo BOD Me we Se S le & 0006 0002 00CcO 0000 
DRIVENUM «¢ a @ @ 6s ww & & ww «@ 0005 0001 0020 0000 
HEADNUM.: Go & eo ow wR we we GS 0000 0005 OO1F 0000 
Ai -CMDOSTRUCs 6 ae Ok. Sw & ww 0004 0003 
BXOPCODE.: «6: @ 6. @ 0 @ «© 2 w% 0000 
HCMD: SUBR « @ «oe & @ ae & 8 0001 
H_CMD_MODE_DMA . . .. «© «© «© « + 0003 
PARAMETER_TABLE. . . «© «© «© «© « « 0010 OOOA 
PUGYUS om Gt ee WOR, Me Bw 0000 
PLNBADS s. arg @- shoe. .@ se: Ge, ey. Ler 0002 
PUWRITE_CURS © 6 i ee Bw wos 0003 
P_PRECOMP. 2 «© @ & & S me @ wm 0005 
P_ECC_LEN. 2 ow oe 8 @ ww WS ew © Sw 0007 
P.COMTROL BYTE: « « & ww @ it % 0008 
PU TIMEOUT... «2 & & ww ee & @ 0009 
P_FMT_TIMEOUT. . «© «© «© © © «© © «@ OOOA 
P_DRVDIAG_TIMEOUT. . ....+.s - 0O00OB 
PEDO a. cele! te, A GS SS. SS re eS 000C 
Segments and groups: 
Name Size align combine class 
ABSO « & e & ww © we HS ee we w S 0080 PARA PUBLIC 'RAM'! 
CODE 6 6 6 @ HOw & S Bw Ke FFFE PARA PUBLIC 'ROM! 
DART R ee Gh) ee ee ey a WS WP Hw 0088 PARA PUBLIC 'RAM' 
STACK_URAM. «& & © & # &@ BH * & @ 0000 PARA PUBLIC 'RAM! 
VORAM 5 oi. & a me a HOS HOS G 0000 PARA PUBLIC 'RAM' 


Symbols: 


ear we cn RS I SL 
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Name Type Value Attr 
ABSOUSEG 3s a 6S ew & % ww we Number 0000 
ADDR_MARK_ERROR. . ....... Number 0002 
ALL OWLDMIAS 5.04) bite 3 ow ee « Number 0003 
ALT_LINPUT. ... ee oe eo L BYTE 0019 DATA 
BGT ORE Ye aoe Se ee we Se! OD Se Number 0038 
ALTRET.. « a % . o ow wa ww L WORD E2CA CODE 
ALT SHIFT: © 6. @ @ «we aw « a “ye Number 0008 
AP_FINISH. .. F ° F L NEAR D530 CODE 
ASSIGN_PARAM . . . N PROC D504 CODE Length =002E 
ASSIGN_PARAM_1 N PROC D532 CODE Length =006B 


Number 000C 
Number 0009 


ASSIGN_PARAM_BX. 
ASSIGN_PARAM_INT 


ie ie tet er aw: ee lee 
oe SSG we Ae & SS 
es @ « 


AW FINISH 6) 3 a 4 ‘ ae L NEAR D59C CODE 
BADTRACK_ERR... ; a Number 000B 
BANNER.M..... F o ° L BYTE DB8C CODE 
BEL. « « @ «© & w % f acts é Number 0007 
BELLOWAIT. «@ @ 6 wow % by ; L NEAR’ F567 CODE 
BIOS BREAK « « 6 « « « i ee @ L BYTE 0071 DATA 
BOOT_A.DISK, « « «© « % So Bu a aK N PROC D12A CODE Length =0021 
BOOTLINDIRECT. & «< % # # mw 4 ¥ @ L WORD D126 CODE 
BIS! a) ley iE a ae Rp Se SY ae cer or a Number 0008 
BICBDNK SG. t-6! ewe ee er Ut wm Re L NEAR’ F8B3 CODE 
Bile DEG. i. sé Ge) a as ee a HE. ho L NEAR F8B9 CODE 
Bil e-waste L NEAR F88E CODE 
BTINT is @ 6. i % @ So Gew wy @ ws N PROC F860 CODE Length =0076 
BILOMP os we ee SW te we wh a Rm N PROC E6F2 CODE Length =0003 
BM ie! ie, ee ee a cw L BYTE DBB7 CODE 
BTSMERRa & a wm ewe «oo we & © L BYTE DBD! CODE 
BT ONT, et Go as Ww OW Ge we we a L NEAR F8A4 CODE 
BO a te ae Be Re Se SE L NEAR F87B CODE 
BILORe «6 6 A We we Se ER ~ ww « L NEAR’ F8C4 CODE 
Br USPACES:.. « « w w t G@ a ie we & « L BYTE DBF6 CODE 
BUPFERIEND 3 6 3. & @ “© @ @ & @ w L WORD 0082 DATA 
BUFRFERWHEAD, « « © «© @ «© @ @ «@ @ L WORD OO1A DATA 
BUFPERUSTART «6 4% 2 & @ & » & & L WORD 0080 DATA 
BUFFER_TAIL. « 2 «& & & @ @ © & @ L WORD 001C DATA 
BXDTAG BX. 6 ee eo we ® we ws Number 0OOE4 

BXDIAG INT & « &% & & ww eH ww Number 0014 
BX_ERRORUTABLE «4 6 se % % % % L NEAR D4OF CODE 
BX_READY cok oo & RS & aR we L NEAR D438 CODE 
BIFAILED «§ 2 «w #@ © & % & eK @ w L NEAR D124 CODE 
BoLOST & fc a eo me wR ee Se L NEAR D144 CODE 
Bes cet Gi ee As Sen, Ge BD a SS L NEAR D12A CODE 
BOR 6: ew sae Wile, Ge  we S -e e S L NEAR D11F CODE 
BTRYOHDU.: ic ws 6 eh aw we wee we L NEAR D10C CODE 
CAPS. -LOCK KEY, & «4 «© «© & @ « © % Number 003A 

CAPS LOCK_MODE «. « « # «© «© © @ ® Number 0040 
CAPS_LOCK_SHIFT. ........ Number 0040 
CHKTRK.BXs: 6 6 «te @ ee we we we Number 0005 

CHR ONT os 4 6 & & S He we L BYTE FFFD CODE 
CHR UO%s «6 sw @ He ew ew He « L BYTE C000 CODE 
CMDOBLOCK. 2 @ « & «w % % @ # @ L BYTE 0042 DATA 
CMD_ERROR: 2 6 4 @ 6% &% ® © % w @ Number 0001 
CNTRLUKEX: & @ 2) 6 6 we % % wa Number 001D 
CNURLOSHIFT:. © © & 6 @ » @ » © % Number 0004 
CODESEG «3 « #@ © © 8 © @ « & % Number F000 
COLORPOINTER, « © «© & 6 % % w % Number 03D4 
COMMAND: & © «© @ & w @ ® & Sow o2 N PROC D3DD CODE Length =003B 


COMMCONTROL, .« «© 3 & » © © @ & « Number 0065 

COM BAUD: 6 a 48 ® ewe ee HB WM L WORD E729 CODE 

COM CUS): oi 2.8 we & ee & @ we % Number 0010 

COMLDATAY: 2 «© & Sw © we Hm % N PROC E729 CODE Length =0010 
COM_DATIALA, 3. oo wee e 3S eb @ we « Number 03F8 

COM DATA B ce ew % ~ a Number 02F8 

COM_DSIRG: & 4 6 & 6 © @ ww Se Number 0020 

COM_DDRS 6% “6 wee @ & & w Ws Number 0001 

COMLPE © © 6 6 # © 6 @ wo eo ww % Number 0008 

COMIGB 6. ape de @ we HS Re ae N PROC EQ2A CODE Length =0023 
COMSE DAA a: smu we ew we we RSs Number 0O3FA 

COM_ID_B sw 4 6% @ & ww & @ i we Number O2FA 

COMLINIT cc © & wo & © &% % % 6 N PROC E78F CODE Length =003A 
COMAIOE 6. bm & @ ew a we we wow we Number 0002 

COMLUPB 6 6-8 © 6 8 wow we ww Me N PROC’ E8EC CODE Length =002F 
COM PES hice we WOR Oe Gow BD. Number 0004 

COMLRTS: «2% © © © & @ @ @ @ &% @ Number 0002 

COM ORZD., & 6 wi We we ee we We Number 0001 

COM_STAT 4.64 4 % © @ & w © ww « L NEAR’ E87F CODE 

COM_TE «6 8 6 © & * 2% &@ @ | % & Number 0080 

COM_TZXD.. oo So Gow we He Bow ws Number 0020 

CONTROLB cs. @. 6 a oe ow web w Number 0062 

CONTROL_BYTE «ss 2% @ & % w % L BYTE 0076 DATA 

CRisg ti @ & 6 -e S -wow & eS ww & Be Number 0OO00D 

CRCOLERROR. «w jc eww De Se eH Number 0010 

CUBCDOHEX: 6 4 6 4% 3 @ & w © w 4% N PROC F962 CODE Length =0011 
C_DATAN 6: 6 ace wm ar aoe & eee N PROC F8D6 CODE Length =001C 
C_DYMOs. @ @ Ss wo a ow we we S L BYTE F8E6 CODE 

CLDYUYRs & «i @ oe # & GS Be wr ww L WORD F8D6 CODE 

C_FINISE s 6 26 & © Be ee «& 4 L NEAR D417 CODE 

CGDAYS): « @ «© & @ w ~ # ww @ « N PROC FOFD CODE Length =0013 
CUGRET 6. ee @ 6 a Sw ww % L NEAR’ FAOF CODE 

CoRBCD a) 68 «we @ 6 w% ww we © * L NEAR F945 CODE 

CURBUP «¢ o 426 0s @ 3% & & © w % L NEAR FO94B CODE 

CLRBRETs: oo Rm i @ W be w Sa « L NEAR F956 CODE 

C-READ «: «4-4 wm 4 -S wom wwe < N PROC F8F2 CODE Length =0066 
CHRHEX « sw *@ BH we Rw wH N PROC F958 CODE Length =000A 
CORMOe ow eS ee te we oh ws MH L NEAR F917 CODE 

COR MEP ga oS ok es ao we a we a L NEAR F9OF CODE 
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C_WAIT L NEAR D404 CODE 

C_WERR L NEAR’ F9EB CODE 

C_WHEX oe 4 ie CO ee ee a we N PROC F9EC CODE Length =0011 
CWMDP i. we a ee He He HR Hw ww L NEAR’ F9B3 CODE 

C_WRITE. N PROC F973 CODE Length =0079 
C_WYLP . L NEAR FO9QE CODE 

DATASOUT 5 ccc wa are -m Wh N PROC D59D CODE Length =0014 
DATA-SEG « «§ 68 sw % ee SE | S % Number 0040 

DOOLON «ce « « # * « % @ BS & & N PROC E626 CODE Length =000C 
DORE FP.) % oh ea = me oe OH Ke N PROC £619 CODE Length =000D 
DELETEWKEY & « @ 6 @ S & wwe @ Number 0053 

DHEXBYTE « = « «© © @ & & & -& @ N PROC E643 CODE Length =000D 
DHEXLONG N PROC £632 CODE Length =000A 
DHEXNIB. 2. 6 « wm © ww we @ ~% & GS N PROC’ E650 CODE Length =0015 
DHEXWORD «. 6 4 @ «© @ & & 6 @ w « N PROC £E63C CODE Length =0007 
DIAGNOSTICS_1. « «© « « « N PROC DDS5A CODE Length =038F 
DISABLE_DISK_INTERRU PTS. s N PROC D5FA CODE Length =0035 
DISALLOW_DMA3. . . « «© «© © «© «© « Number 0007 

DISKETTE_IO) « « «= «© © w & & & @ L NEAR EC80 CODE 
DISKETTE_STATUS. 2 2 »© @ & & @ « L BYTE 0041 DATA 

DIESK_STATUS. «© «© «2 6 # & @® © @ L BYTE 0074 DATA 

DIS:P PASS. 5.82 @€@ + 6 4S GB & @ ve L NEAR DFIA CODE 

DEX UKE » a ow 4 wo FP SR ow SG we ww Number 0001 

DMA_LADDROO « 2 ve « we ww & ww Number 0000 

DMA_ADDR_1 . 6 © 8 8 8 @ me oH Number 0002 

DMALADDR-2 «2 @ @ 8 ow © w wm H * @ Number 0004 

DMA_ADDRU3 2 6 « s 7 & & & H & 4 Number 0006 

DMA_CMD_DISABLE. . . ..... Number 0004 

DMA_CMD_ENABLE . . «. «© © «© «© « + Number 0000 

DMA_COMMAND. « «& «© 2 94 w & © & % Number 0008 

DMA_COUNT_O. 2. © «© » © e @ & & @ Number 0001 

DMA_COUNT_Ts . 2 & # © % w@ & &% «@ Number 0003 

DMA_COUNT_2. . . «© «© © «© © © @ 6 Number 0005 

DMA_COUNT_3. 2. «© © «© © © © » @ @ Number 0007 

DMA_ERROR. 2. 5 2 © 6 © @ ww © Number 0008 

DMA_FF_LUCLR « «© « «= © © © @ @ -« 6 Number 000C 

DMA_MASK_BIT . . . «© «© «© «© «© «© Number OOO0OA 

DMA_MASK_CLR . . . «© «© «© «© «© © « Number OOOE 

DMA_MASK_WRITE . . 2. 2. «© e© © @ Number 0OOOF 

DMA_MASTER_LCLR ss 2. ws @ & @ & Number 000D 

DMA_MODE. . we Ss @ ww # Se Number 0OO0O0B 

DMA_MODE_O . «© s «© @ © # @ ew Number 0058 

DMA_MODE_1 . 2. «© «© © «© «© «© © @ «@ Number 0041 

DMA_MODE_2 «© & «© s @ & % @ ®@ @ *® Number 0056 

DMA_MODE_3 . . «© «© © «© «© © © «© ¢ Number 0043 

DMA_REQUEST. . «© © » @ @ % % «© @ Number 0009 

DMAWSEGM.O « « & % we se ww & % Number 0080 

DMA_SEGM_1 «© «§ « & % & *% Be w @ Number 0082 

DMA._SEGM_2 « «© © « @ % woe @ @ 5 Number 0081 

DMA_SEGM_3 . «© w= © «© © © w &@ © Number 0083 

DMA_SEG_ERROR. . . . «© «© «© © @ «@ Number 0009 

DMALSTATUS 3.00 «© & @ 4% & G ® Bs Number 0008 

DMA.TEMP . 2 © 8 @ wm % ew @ & Number 0O0O0D 

DMALUNMASK.O0 «© «. «© w @ 6 ® HE Number 0000 

DNUM. <: a a. 8 oe @ Rig Bw x N PROC E665 CODE Length =0008 
DNUMWV. «© « © & © © we Ke we wo we « N PROC E66D CODE Length =0031 
DNUMW_LOOP L NEAR E677 CODE 

DNUMW_SKIP L NEAR E68D CODE 

DNUMW_SPACES L NEAR E685 CODE 

DO_READY L NEAR D5A7 CODE 

DROMS TRING Si ie ee ee ek N PROC’ ES5FA CODE Length =0008 
DREVDIAG_BE . « 2 sc & ee eH Be HB Number OO0E3 

PSTRING: « @ % © ® @ we Se SH HR N PROC E602 CODE Length =0017 
DS LP o 7 4% Boe oS & Com w -e @ L NEAR E609 CODE 

DS. RET @ & a ow @ Bow “SD Gee f L NEAR’ E614 CODE 

DUMMY_IRET « 2. «© «© «© @ «© © © @ «@ N PROC FF4B CODE Length =0009 
ECC_USED_ERR . «© & « & @ #« @ «@ « Number 0011 

E LOSE 2 4 2% 8 % &@ 6 & ee w L NEAR D3D3 CODE 

E_READ_SENSE .« «© «© «© © © 8 © «© * L NEAR D366 CODE 

PAITLOM 33 6 @ © ee ee Ew 8 L BYTE DC45 CODE 

FAR GALLS... « « «. @ Se 6 we @ & WS F PROC COO4 CODE Length =005C 
FDC_ERROR., « © 2 © & w © % @ © 6 Number 0020 

FDU_DATA1. N PROC EE20 CODE Length =0009 
FDU_DATA2. N PROC’ EFC7 CODE Length =000B 
FD_INT N PROC EF57 CODE Length =0014 
FD_IO. . F PROC EC59 CODE Length =0066 
FD_PARMS L BYTE EFC7 CODE 

FINISHED L NEAR D693 CODE 

FLAGS_DATA1. iy ae RL. Se SP N PROC C000 CODE Length =0004 
FMTBAD. BX: « «- « «© «6 © © & © © tw Number 0007 

FMTDRV_BX. . . «© «© «© © © © «© «© « Number 0004 

FMEDRV_INT «ow «© 6 ee em eH Number 0007 

EMTTREUBX. « & so Se eB Be w Number 0006 

FONTHIGs koa) Se) @ © wee N PROC C860 CODE Length =0400 
FONTLOMN:. « « «@ @ & oe @ @ N PROC C060 CODE Length =0800 
FONTLO8. .. N PROC FA6E CODE Length =0400 
FONT_HI_8X8. L BYTE C860 CODE 

FONT_LO_8X16 L BYTE C060 CODE 

FONT_LO_8x8. . . a: Rh ae Hh ey L BYTE FA6E CODE 

FORMAT_ERROR . . 1. 2. 2 «© © © @ L NEAR D69F CODE 

F_BUFOPF . a 2 4 1 we SE me we S Text [bp+4] 

F_CHECK_VALID. . . « «© «© «© » « N PROC’ EFAD CODE Length =001A 
ECOMMANDs*& wa a -«% 4 @ @ 6 6 Text [bp+3] 

F_.CONT . « © @ &@ © 6 % & @ BH >* L NEAR’ EF26 CODE 

F.CV_RET « w 6 wie ewe ww mH Se L NEAR’ EFC5 CODE 

FLCYL:« «8. -@ & Bo we Ge wa Sas Text [op+7] 

F_DRIVES «© « os ee ow ew Oe eM Text [bp+0] 

F_FORMATCMD . « © 2 6 & & & @ @ Number OO4D 

F_GB_DECODE. . . .. + «© «© © « « L NEAR’ EE65 CODE 

FIGBLJMP 6 «3 a 6) @ © woe ws L NEAR’ EE6D CODE 
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ARES LS NSLS a TS SE TI ST OO TT TEC TS TTT, 


F_GBOLOOP., « « « « %« 
F_GB LOOP) . «6 & «© « 
F.GBUOUT « « © © @ » 
FGBLURET ¢ « @ % « % 


F_GB_TABLE. . 
F_GET_BYTE. . 
F_GET_VAR. : 
FLHEAD « « « « 
F_HEAD_SETTLE. é 
FLALTs 4. 0 @ #4. w 
FAUT we cece a A 
POV) -bs 4 Be ty ees 
F_IO_RET : 


F_MOTOR_ON.... 
F_MOTOR_PORT ° . 
F_-MOTOR.WAIT « « 2 « 


F_MO_RET : a 
PUINIDMA. <5. .6 “oe ae a 
FLNEGUDATA « a ¢ «3 
FLNEC_RDY.. 4. « a «7 % 


F_NEC_RESET. ... 
F_NEC_RESET_RET. 
F_NEC_STATUS . 
FONRia i a ae. & 
F_NR_RET Lo. 
F_LNUMSECS. ..... 
F_PB_ERRET..... 
F_PB_LRET. ..... 
F_PUT_BYTE.... 
FORT gs @ «2° @ & % 
FOR2 A dp or uk ae 
FORD ic ec cel ar ee 
FORDATRS Sos cw @ & 
FRDULOOPs, « « «& & & 
F_READ_CMD..... 
F_LREAL_DRIVE.... 
F_RECAL_CMD. nook 
FORESET.. ug. « 
FoRWis oo G & G x 
F_LRW2...... 
F_RW3.... 
F_RW_COMMON. Bo ie 2 
F_LRW_RET. ....., 
FLRWUSKIP. « « @ « % 
FS. @ ack 
F-SDla. a a © & #6 
BSD 2. KG ws we de 
FSD-RET... 6 & « < 
F_SECNUM. .... 
F_SEBK « a «6 4 « % 
F_SEEK_CMD.... 
F_SET_DMA. . 

F_SIS. . ay Bo 
F_SNSDRV_CMD.. . 
F_SNSINT_CMD. . 
F_SPECIFY_CMD. 
F_SRT_48 i? ane 
FOSRT06: c. a © -d> a 
FOSURECAIN cw <. « 
FS RET. « 6 «00 
F_TABLE. . 5 6 a 4 4 
F_WAIT_FOR.NEC... 
F_WAIT_ONE_MS. : 
FoWDMG 6. 656 ©, way ac 
F_WDATA. . . 
F_WD_LOOP. 
F_WRITE_CMD. 
GAME_CARDs « < « @ « 
GET_DRIVETYPE_VECTOR 
GRF_GRAPHICS_DOWN. 
GRF_GRAPHICS_READ. 
GRF_GRAPHICS UP... 
GRF_GRAPHICS_WRITE . 
GRF_LIGHT_PEN. ... 
GRF_READ_DOT . 
GRF_WRITE_DOT. . . 


G_T2 . e % 
G_8X16_2 es w F 
GuS X62: «  & a6 w 


G_ADDR . 2. «© «© «© « « 
G_ADDR_TEST. . ... 
G_ALIGN_DOT. .... 
G_BITMASK. .... . 
G_CHAR.LP. .... 
G_CMP_MOD. ..... 
G_COLOR_TABLE. .. . 
G_CURS_OFF .... . 
G_DETMODE. .... . 
G_EXP_BYTs 3 «© «@ « «@ 
G_FILLER . 1. «2 @ 6 


GF CONT « 4 a @ « 
GF EQIT « & % % 2 
GaP eTeLP «Ge ae 
GE MECH 4 os « 
G_F_S_LP ; 

GA Whe « ok a-& * 
G_TA_LP. Ah ‘ 
GIALP.. ; 
G_JSFY_DOT «4 « « « 
GC UOS By na ee x 


NEAR 
NEAR 
NEAR 
NEAR 
BYTE 
PROC 
PROC 
Text 

L NEAR 
Number 
Number 
L NEAR 
L NEAR 
N PROC 
Number 
Number 
L NEAR 
Number 
Number 
N PROC 


ae i ie 


er SE ee er ae ee eae a a ae ae es ae ae 
w 
KS 
| 
w 


Length =O04A 
Length =000D 


Length =0025 


Length =0017 
Length =0018 


Length =0014 


Length =0022 


Length =0055 


Length =0078 


Length =007A 


Length =005A 
Length =000B 


Length =0020 
Length =0008 


Length =002C 


Length =0039 
Length =0063 
Length =00ED 
Length =0055 
Length =0106 
Length =0003 
Length =001A 
Length =002B 


Length =005F 


Length =001E 


Length =001E 
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G_LDS_W. 
G_LINELP 

G_MASK . 

G_MATCHB 

G_MEDGET 

G_MED_BIT. 

G_MED IA. . 
G_MED_STORE. 

G-MEDUWR ¢.¢ «2 © # « 
G_MOAREA «8 @ & & » * 
G_RDLOOP 

G_RD_IA. 

G_RD_MED 

G_REPCHAR. 

G_ RETURN 

G_SCAN_LP. 

G_SCROLLER 

G_SELFONT. 

G_SETDOWN. 

G_SET_UP 

G_SKP_1. 

G_SKP_2. 

G_SKP_3. 

G_SKP_4. 

G_SKP_5. 

G_SUPER_WR 
G_TEST_ADDR. 
G_TINYTEXT 

G_TST_MOD. 

G_T_XOR. ... 
G_UNREVERSE VIDEO. LOOP 
G_W BYTE : 
G_XORBIT « « < 
HARD_DISK_INT13. 
HDU_BSY. 

HDU_CD. . ; 
HDU_DMA_SEGM . 

HDU_IO 

HDU_IRQ5 . . 
HDU_PARM_TBL 

HDU_REQ. 

HD_ERROR 

HF_NUM . 

H_ABS_M. ’ 
H_BAD_COMMAND. 
H_BAD_M. 

H_BOOT. . 
H_CMD_TABLE. 
H_CMD_WAIT 

H_C_ERR. 

H_DATA1. 

H_DATA2. 

H DMA. . . 

H_DMA_BUFF 

H_DMA_ERR. 

H_DMA_LEN. 

H_DMA_LONG 

H_ERR_CHK. 

H_ERR_M. . 

H_ERR_RET. 

H_FINISH 

H_FMT. 

H_FMT_M. be ou. fr ee et 
H-GOODM « 6 4 0 6 © @ 
H_HAD_ERR. 

H_INIT 

HoINTs « 

H_INTRO_M. 

H_IO.. 

H_MAKE_CDB 

H_NDMA 

H_NONE_M 

H_PASS M. . 
H_SAVE_REGS. 

ILL_FLG. 

ILL_INT. 

ILL_LN 

ILL_LP 

Pt MA ~s -6—se sa) oe <a 
TELM? 6 oa @ 
ILL_M3 ? 
ILL_SW 

ILL_TRAP. . . 
INIT_CONTROLLER LP 
INIT_DRIVE_LP. 
INIT_DRIVE_WIN 
INIT_ERR... 

INIT START_TIMER 
INIT_TRY_DRIVE. ... 
INSERT_KEY ai 
INSERT_MODE. 

INSERT _SHIFT 
INTOOLOCN. 

INTO1LOCN. 

INTO2LOCN. . . 
INTO3LOCN. .. 
INTO4LOCN. . ee a 
INTOSLOCN: & © a se @ 
INTO6LOCN. . .... 
INTOTLOCNs «. 6 4 @ « 


ee Re SESE SSD RE PE SS TD 
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NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
PROC 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
Number 
Number 
Number 
Number 
Number 
L NEAR 
Number 
BYTE 
BYTE 
BYTE 
NEAR 
BYTE 
PROC 
NEAR 
PROC 
umber 
PROC 
PROC 
PROC 
NEAR 
NEAR 
NEAR 
NEAR 
PROC 
BYTE 
NEAR 
NEAR 
PROC 
BYTE 
BYTE 
NEAR 
PROC 
PROC 
BYTE 
PROC 
NEAR 
PROC 
BYTE 
BYTE 
NEAR 
NEAR 
PROC 
NEAR 
NEAR 
BYTE 
BYTE 
BYTE 
NEAR 
PROC 
NEAR 
NEAR 
NEAR 
Number 
L NEAR 
L NEAR 
Number 
Number 
Number 
L DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 


PeCSR CCS CPPS Pere Sr Serr rere Mer ee eee re 


Pererrrrrr srr rr esr wyrez srr r zr rr srr errs eee eee 


Sere Siler 


CODE 


DATA 
DATA 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 


CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 


CODE 
CODE 


AB SO 
ABSO 


Length =0022 


Length =0041 
Length =0064 
Length =0040 


Length =0121 
Length =007D 


Length =0093 


Length =006C 


Length =011C 
Length =0011 


Length =0116 


Length =000C 


Length =0028 


Length =0049 


INTO8LOCN. . 
INTOQLOCN. . 
INTOALOCN. . . 
INTOBLOCN. .. 
INTOCLOCN. . . 
INTODLOCN. 
INTOELOCN. 
INTOFLOCN. .. 
INTIOLOCN. .. 
INT11LOCN. .. 
INT12LOCN. 
INT13LOCN. 
INT14LOCN. 
INTI5LOCN. 
INT16LOCN. 
INT17LOCN. 
INT18LOCN. . 
INTI9LOCN. .. 
INT1ALOCN. .. 
INTIBLOCN. .. 
INTICLOCN. . 
INT1DLOCN. . 
INT1ELOCN. . 
INT1FLOCN. . . 
INTR_FLAG. . . 
IO_ROM_INIT. . 
IO_ROM_SEG . . 
I_LALT_CONT. . 
I_LALT_CPU. .. 
I_LALT_ECHO. . 


I_LALT_LEND. .. 
I_ALT_FOUND. . 
I_LALT_INQ. . . 


I_ALT_RESTART. 
I_ALT_SELECT_M 
fit Teer. « 
Cla « 6 ss 
T_CAL.O% «.« 
I CAL_1_1_80 . 
I_CAL_END. . . 
I_CAL_ERR. . 
I_CAL_MAX. . . 
T_CAL_OK ss. 
t CAL Vibs ss 
COMM. «4 « 
I CPU. 6 « 6 « 
I_CPU_LERR. . . 
f Cru_w. » «s 
T.CP0 OF . «. « 
TLDMAC & 2 9 
I_DMAC_ERR. . 
I_DMAC_LLP. . . 
I_DMACM... 
I_DMAC_NIB. . 
I_DMAC_OK. . . 
I_DMAC_PASS2 . 
I_DMAC_RET. . 
I_LDMAT.... 
I_DMAT_ERR. . 
I_LDMATM... 
I_DMAT_OK. 
I_DMAT_RET. . 
I_D_80xX25. . . 
T_D_INT? «4. « 
2s 
I_D_MODE. . 
I_D_OK . 

{ PATAL. « 
I_FATAL_RET. 
I_FDUAM... 
I_FDUB_M... 
I_FDU_END. . . 
I_FDULLP... 
I_FDU_NOT_M. . 
T FDU_OK . . 
I_FDU_RDY_M. 
I_HDU_M. 
I_HDU_OK . 
I_INIT_END . 

. USNs 4 
I_KB_ST_M. 
I_NO_COM_A . 
I_NO_COM_B.. 
I_NO_GAME_CARD 
I_NO_SCCS. 
TNPULM: Ge 
I_OPTROMLM. . 
I_OUT_MASK. . 
See 
I PIC_O_OK.. 
I_PIC_1_OK . 
TFEC 2 OF « 
I_PIC_3_OK . 
I_PIC_4_OK 
I_PIC_END. 
I_PIC_ERR. 
I_PIC_HARD 
I_PIC_HOT. 
I_PIC_INIT 
T.Pre_M. 


oa oe se 


se 2 SR ew 


© © © © © © ew 


[sel <TH soul <p lll scp cael pl oak sao cal sade cot cool cool gall sah sJAl at sagt) od alll co soJBl aI al ool al geal a dl sal cI sa ede Hl cl ca a cd se a a sa Se sl oe ot Se a pal a edd coed oa SN oa a aa cod) ne ca sll oo aad soll mal so a Ta So aed a rE a ll Sl ed a Se a aS ddl ool al el Seal oe a a aed a a 


Length =0058 


Length =005F 


Length =0009 


Length =0011 


ROM BIOS 


Listing 
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ROM BIOS 
Listing 


Y PIC_NOUHOT 2 « © 2 # « L NEAR’ DFO5 CODE 
ToPTCLOR «. oe e © w © * L NEAR’ DFOB CODE 
I_PIC_SOFT . we er Se ae L NEAR DE8E CODE 
YPC TEST wo « & & F Gm 2 L NEAR’ DEBB CODE 
I_PRT_EXIT . L NEAR £E39B CODE 
I_PRT_LOOP.. L NEAR £382 CODE 
I_PRT_M. . din a Sr ie L BYTE DCDO CODE 
I_RAMLM. «© © @ © © @ L BYTE DCEA CODE 
ToSROMs, sme & ww ee oe 8 L NEAR DDB2 CODE 
I_ROM_ERR. . . - © «© L NEAR’ DDBA CODE 
T. ROMOM.. « o 6 2 we & wom « L BYTE DC58 CODE 
FE ROMLOK «. «© «© 4 @ & =  @ L NEAR DDCO CODE 
I_ROM_RET. F L NEAR DDB8 CODE 
TE RTC. « # L NEAR EO7B CODE 
I_RTC_END. L NEAR’ EOE! CODE 
I_RTC_ERR. L NEAR EOB9 CODE 
I_RTC_HI_M L BYTE DCB7 CODE 
T_RTC_LO_M L BYTE DCB3 CODE 
I_RTC_M. L BYTE DCA6 CODE 
I_RTC_NR_M L BYTE DCBB CODE 
I_RTC_OK L NEAR EOD5 CODE 
I_VECO L NEAR’ E1B0 CODE 
I_VEC8 . A es Ge L NEAR’ E1CC CODE 
| POVECTOR « «se @ Bm & x N PROC’ E1A0 CODE Length =003C 
I_VEC_TBL. Be ee ee wee Ge N PROC FEF3 CODE Length =0030 
POALT. &@ «a «Ss we ee Ke we Number 0OO0C4 
KBBRK.. & & 2 @ @ @ 9 @ ww « @ &% « Number 00C9 
KBCAP. ww 6 ae 8 ae ew Be we 8 we « Number 00C1 
RBiCTL ke ww: Se Be & He We wm OS Number 00C5 
KBINS: « «= & # «@ 8 08 ©. © & & & &@ Number 00CO 
KBUSHe « @ o @ % Se © & w aoa Ee Number 00C6 
KBNULs «8 & @ se «© @ @ tom & © 8 Number 0OO0CC 
KBINUIMS w we ao a © SR ew ee eg Ss Number 00C2 
KBPRT 2 » wo «© @ @ we wo ws Number 0OOCB 
KBRES. « ¢ @ @ 3 © # @ wR & % @ Number 00C8 
KBRSH: <¢ s @ ® @ 8 we & Oo G © e 8 Number 00C7 
KB SOR woe) te a Gi -e Se ae oe 8 Number 00C3 
KBLBUFPER. « «© © ® © © @ % ow & 6 L WORD OO1E DATA Length =0010 
KB_CAP_FLAGS . 1. 3 © «© © # © @ » L BYTE CC60 CODE 
KB_CMD_SEND. . . «. » «© «© «© # N PROC E581 CODE Length =000B 
KB_CMD_WLUP. ‘ L NEAR’ E581 CODE 
KB_DATAL « «© «© ®@ # &@ @ 8 N PROC CC60 CODE Length =033F 
KB_DATA_TABLE. . . «. « L BYTE CC67 CODE 
KB_FLAG. eo 4 L BYTE 0017 DATA 
KB_FLAG_1. L BYTE 0018 DATA 
KB_FLUSH. . L NEAR E304 CODE 
KB_FLUSH_BACK. L NEAR E313 CODE 
KB_NOT_DLX i ae wm w aw L NEAR £361 CODE 
KB_STATUS) «© a © Be we Foe & Number 0064 
KB_TYPE_READ . . «© © «© «© «© © © « L NEAR E351 CODE 
KB_TYPELWAIT 1. & «= © © & » & @ 4 L NEAR E346 CODE 
KDBLOs « & «© % & @ «@ © woe & ws Number 0O0D8 
KDECGO. «© «© 6 @ % & @ ww Tw @ Number 00D7 
KDECTs 6 o wom e @ WOM sR Bow oa Number 0OOD6 
KDEG2s <4 2 w 4 OG @ % @ Sw wm Number 0OO0D5 
KDEC3s « 6 #8 4 @ @ &% 8 fh | me wi Number OOD4 
KDEGR: « «@ &% © 6 2 6 @ a He HD ew Number 00D3 
KDECS:. © 6 & & eG 8 ce Rm Hw Number 00D2 
KDEC6«: bs wa ae DO OOS HHS Number 0O0D1 
KDECT«. -: a @ @ @ @ # @ 4% @ wo @ « Number 0OO0DO 
KOBCS ss «6 «es eR & Be Ee Sw ow Number OOCF 
RDECS. «a a @ & 2 ae & ee ww & Number 0OOCE 
KRONE. ss 6 * & & ew ee oe eG Number OOCD 
R00 & «6 se 6 eR oe ee we we L NEAR EB35 CODE 
K_2RES L NEAR EB18 CODE 
| K_2RET L NEAR EBOA CODE 
| KO 2T0G 5 «ws « @ 4 @ Bw S L NEAR’ EBOF CODE 
| KoURES 4 & ws © @ woe & & © L NEAR’ EAET CODE 
K_4RET . é L NEAR’ EAE6 CODE 
KOSTOG « a « wf & & OR we BH ws L NEAR’ EAD4 CODE 
K_ADV_END. . 2. 6 ss © © @ wo L NEAR’ E87A CODE 
K_ADV_PTR. N PROC E86E CODE Length =000D 
KeALTs. Go ote ae a Bae L NEAR’ EAEE CODE 
KALTO . 6 = @ ow ww % 48 L NEAR’ EB28 CODE 
K AGT 4 «a && @ L NEAR’ EB27 CODE 
KALT2 2. 2 & & @ © L NEAR’ EB26 CODE 
KO AGTS GW. se en @ OG L NEAR- EB25 CODE 
KU ALTS ws. en ee eH SG HD w L NEAR’ EB24 CODE 
K_ALTS L NEAR’ EB23 CODE 
KUAGTO: a, 40 @ ee Sh wi SW L NEAR- EB22 CODE 
KOALTT «a 2 8 we oe HT SD @ L NEAR EB21 CODE 
RO ALITS: cara L NEAR’ EB20 CODE 
K_ALT9 L NEAR’ EBIF CODE 
K BEEP we so. 2 © we we oe eS N PROC’ EBC3 CODE Length =0023 
ROBiTs o 6 wo @ ar ew RH SNe OW N PROC EB85 CODE Length =O0O1F 
K_BRE: « i @ a ee Se Hw | EH WG L NEAR’ EB42 CODE 
KuBUB. «© ~-te @ aise © & Sow woe 6 L NEAR EA56 CODE 
K_CAR. @ oi © Be as oS wee e L NEAR’ EAB5 CODE 
K-CASE «% 2 i © & @ @ @ @ L WORD EBE6 CODE 
KCThs: << w & «+ % *@ T ws L NEAR’ EBOO CODE 
K_DATA1. . ; N PROC EBE6 CODE Length =0032 
K_EOI. N PROC’ EBA4 CODE Length =0009 
K_HOLD a a a ee ee eee L NEAR’ EA92 CODE 
RUINS: G aoe) Sw OE Gh oe OOS HR SH S L NEAR’ EAAT CODE 
KINTs & 2 6 © % @ & © @ @ © @ N PROC E987 CODE Length =01D2 
| > 0 ee ee N PROC E82E CODE Length =0017 
Ree we: ee Om Hae ey. SR Re L NEAR’ EAO2 CODE 
KOSMP Ss oe & wk me SD SS ee we L NEAR EA2D CODE 
K_GEDLCAP. 2. 4 6 © @ © we we ws L NEAR EB63 CODE 
K_LED.CMD. « «© © © @ #8 & © & ws L NEAR EB70 CODE 


en ee rere eee eee eee rea —————————e 
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K_LED_ DAT. .. 
K_LED_NUM. .. 
K_LED_RET. 


K.LOCK « « « « 
K_LOOK... 

RoLP a 6 wr 
KUSH. « & © % 
KONONT 3 « & » 
K_NONE s « « « 
K.NOP. ... 


KNOPY « s. % 
K_NO_CAP. , 
K_NO_CASE. .. 
K_NO_LHOLD. . , 


K_NO_LOCK. .. 
K_NO_XCODE 
K_NUL. a 
K_NUM. 2. 2 w « 
K_OK s . 
K_PAUSE. . 
KiPRT. « « © 
K_READ 

K_RES. 

K_RET. . . 
KORSHS. s. « & & 
KSOR. «6 «2 « « 
KSEE. &% « « ® 
KoOSTAT op a a 
KOURYS a «© 4 
KXLAT « «8 « 
LEFT_SHIFT . . 
LEFT_SHIFT_KEY 
LF 


MASK_PORT. .. 
MASK_PORT_DMAE 
MASK_PORT_INTE 
MASTAB . . . 
MASTER_TBL_PTR 
MAX _INT. 5 « « 
MAYBE_SHOW_SEN 
MEMORY_SIZE. . 
MEMTST.... 
MEMTST_ERR. . 
MEMTST_ERR_C 
MEMTST_R1. . 
MEMTST_R2. . 
MEMTST_W1. 
MEMTST_We2. 
MFG_ERR_FLAG 
MFG_TST. « « « 
MOTOR_COUNT. . 
MOTOR_STATUS . 


MILEND «ws « @ « 
M_CASS .... 
M_EQUIP. > 
MLEXIT . 8 « % 
MSIZE . 2 « « 
NEC_STATUS . . 
NIBOR, «3 « «& % 
NO_LHARD_DISK . 
NUL 6. « 


NUM_LOCK_KEY . 
NUM_LOCK_MODE. 
NUM_LOCK_SHIFT 
N_INT. .. . 
OPT_ROM_M. 
PO_DATA1 . 
P1_DATA1 . 
P4_DATA1 . 
PARA_GRAPH . . 
PARA_MONO, 
PASS_M . 
PAUSE. . . 
PAUSE_MODE 
PCINIT.... 
PICO. « © a « 
PIC_1. ~ « « 
PIC_LICWi ... 
PIC. TCW2: . 2 « 
PIC_ICW3 . ° 
PIC_ICwH . 
PIC_LNEOIL. . 
PIC_OFF_MSK. . 
PIC_SEOI_O.. 
PIC_SEOI1.. 
PIC_SEOI_6.. 
PORT_OFF «2.4 « 
POST_LOSE. . 


SE 


POST_NO_MORE_ DRIVES. 


POST.WIN... 
PRINTER_ADDR . 
PRINTER_T_OUT. 
PRT_DATA_A.. 
PRT_DATA_B.. 
PRT_DATA_C. . 
B8253.0) 

P6253_1 « « 

Pi28253.2 «© aw « 
P_8253_CTRL. . 
P_DISP.... 


. 


NEAR 
PROC 
NEAR 
NEAR 
PROC 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
PROC 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
PROC 
PROC 
NEAR 
Number 
Number 
Number 
Number 
Number 
Number 
L WORD 
L DWORD 
Number 
PROC 
WORD 
PROC 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
NEAR 
BYTE 
BYTE 
BYTE 
BYTE 
WORD 
PROC 
PROC 
NEAR 
PROC 
BYTE 
NEAR 
NEAR 
Number 
Number 
Number 
Number 
N PROC 
L BYTE 
N PROC 
N PROC 
N PROC 
Number 
Number 
L BYTE 
Number 
Number 
N PROC 
Number 
Number 
Number 
Number 
Number 
Number 
Number 
Number 
Number 
Number 
Number 
BYTE 
NEAR 
NEAR 
NEAR 
WORD 
BYTE 
Number 
Number 
Number 
Number 
Number 
Number 
Number 
L NEAR 


i eel 2 BE Oe Be Oe a Bl a Bl oll oll oll oll oll oll oll oll oll all oll oll Boh he 


rerrarsz~azrrrrrrrrrrrzarcza 


Pe eS ee 


CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 

CODE 

CODE 
CODE 
CODE 
CODE 

CODE 
CODE 
CODE 
CODE 

CODE 
CODE 

CODE 


CODE 
DATA 


CODE 
DATA 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
DATA 
DATA 
DATA 
DATA 
CODE 
CODE 
CODE 
CODE 
CODE 
DATA 
CODE 
CODE 


CODE 
CODE 
CODE 
CODE 
CODE 


CODE 


CODE 


DATA 
CODE 
CODE 
CODE 
DATA 
DATA 


CODE 


Length =002C 


Length =0009 


Length =001B 


Length =0005 
Length =0016 


Length =001B 


Length =0047 


Length =0002 


Length =0006 
Length =000C 


Length =000C 
Length =0007 


Length =0001 


Length =0037 
Length =01DD 
Length =0002 


Length =029D 


Length =0004 
Length =0004 
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PIO. 6. ie ec Hw SE ROS A N PROC EFD2 CODE Length =0069 
P_KCTRL ety i Number 0061 

P_KSCAN. c ‘ a a eh, Number 0060 

P_LP . ey ‘ » @ L NEAR’ FOOF CODE 

P_NOP i ; 6 5 NEAR FOOA CODE 

P_OK fs * ‘ L WEAR FO1D CODE 

P_OUT. . 2 F s i. <8 L NEAR FOOB CODE 

P_RET e z Bs F L NEAR FOO5 CODE 

P_SOME ... . «© « « a ah. te ° L NEAR D092 CODE 

P_STAT ay ih cox Be BBY MS) Hep a en SY L NEAR F034 CODE 

POTBLs g.< 6 ow SE Oe S ee BIg L WORD E2BE CODE 

RAMDIAG_BX . . 1. «© + «© © © «© @ Number 0OOEO 

RAMDIAG_INT. .«. «© » 6 © © © © @© «@ Number 0012 

RAM_ERROR. . . «© - e+ © © © wo L NEAR DFC9 CODE 

RAM_SIZE_END . 1. «6 6 © © © © @ L NEAR’ DFAB CODE 

RAM_SIZE_END_1 . «1 © «© © © © © « L NEAR’ DFB5 CODE 

RAM_SIZE_LP. . «© «© © © © © © © L NEAR DF6C CODE 

RAM SIZEONAT 6 & &% © we 6 eH we L NEAR DFA3 CODE 

RAMUSIZE_TST 6 © wv Soe & © eos 8 L NEAR DF5C CODE 

RBUFF_BX i « #2 © &% Ss 2 ee OW Number OOOE 

READ-BXi «6. «= a & me % Wie TS Howe Number 0008 

READECC.BX. « «© « ©» 6 © # © @ @ Number 0OO0O0D 

READINT ¢ 4 «@ @ &% 6 a @ «6 w 4 Number 0002 

READ_MODE: «§ « 6 & * ew we @ He 8 Number 0047 

READ PARAM @ «2 2 ee 6 & we Hw 8 N PROC D4DF CODE Length =0025 
READ_PORT. « « 6 @ © 4 & @ © @ @ Number 0320 

RECALBM oo0 4. GR @ a mar wy APS Number 0001 

RECALINTs «¢ w % © & © % BH we % Number 0011 

RESETBX ¢ 4 a & Gow % a ee N PROC D5B1 CODE Length =0010 
RESETUFLAG ¢ 5 @ a @ Www owe L WORD 0072 DATA 

RESET_INT: 3 3s @ 6 mH os oS @ @ Number 0000 

RESET_PORT 2. s s& @ 6 eH ee we w Number 0321 

RET_FROM_4O,. . © © © «© © 6 & @ L NEAR D1B2 CODE 

RIGHT_SHIFT: « « «4% © = 2 © « Number 0001 

RIGHT_SHIFT_KEY. . «© «© «© «© © @ «@ Number 0036 

RLONGBX sh 8 we HO Hd we we & & Number 0O0OE5 

ROM_CHECKSUM . . «© «© «© «© «© #© © © N PROC ES5E5 CODE Length =000D 
ROM_CHECKSUM_CNT . . - «+ w+ «© «© L NEAR’ E5E8 CODE 
ROM_CHECKSUM_LOOP. . . «. »« «© + L NEAR’ ESEA CODE 

ROM_CHKSUM_OK. . . «© «© «© « + L NEAR E435 CODE 

ROM_ERR. ew 48 N PROC’ E5D5 CODE Length =0010 
ROMLID «+s @ Hoe ee em L BYTE C001 CODE 

ROMLMT « s «© Heo we FH we we L WORD C002 CODE 

ROM_SCAN_EXIT. . . «© «© «© «© « L NEAR EX4E CODE 

ROM_SCAN_LOOP. . . «© «© «© « + L NEAR’ E3FD CODE 

ROM_SCAN_NEXT. . «. «© +» © © L NEAR ES4A CODE 

RS232_ADDR 1. 6 © «om @ wm woe L WORD 0000 DATA Length =0004 
RS_DLY N PROC E8E2 CODE Length =000A 
RS_GBE . L NEAR’ E948 CODE 

RS_INIT. ee oe a “RE L NEAR’ E3F0 CODE 

RSCUP. ok 2 ae Gee He @ L NEAR’ E8E7 CODE 

RSLNOP 2. # 6 & aw & @ w & L NEAR’ ET77D CODE 

RS_NORM. L NEAR E749 CODE 

RS_OK. L NEAR E771 CODE 

RS_PBE . ay He eh wa A ew L NEAR’ E910 CODE 

RSPB. GB cc ab ae RO AD ne wR L NEAR’ EQOF CODE 

RSORET scam G @ G.-w oe @ 0 “Sw L NEAR’ ET77A CODE 

RS_STAT. N PROC’ E87B CODE Length =0043 
RS_TBL L WORD’ ET77F CODE 

RS_WS. Ga) 6 SO we ot es We N PROC E8BE CODE Length =0024 
RS_WS_COM. «§ «© «© «© © © ww L NEAR E8CD CODE 

RS_WS_EXIT ie te wy rw. L NEAR’ E8DE CODE 

RGUWSOLIP «6 wa. % we Wt ue ar oe L NEAR’ E8C3 CODE 

RTC_CHK. a a er N PROC E1F6 CODE Length =0070 
RTC CHK HIGH «» 2 & = 6 % L NEAR’ E265 CODE 

RUC CHR LOWS. o 6% we ww ww % L NEAR E265 CODE 
RTC_CHK_RESET_ERR. . . «. «© «= « L NEAR’ E217 CODE 
RTC_CHK._RESET_LP 5 « «© « % « L NEAR E205 CODE 
RTC_CHK_RESET_OK . ..... L NEAR E21A CODE 
RTC_CHK_SET_ERR. . i w% L NEAR E238 CODE 

RIC_CHK SHTL_LP « & «1 @ we es L NEAR’ E224 CODE 

RTC_CHK_SET_OK s F . L NEAR £E23B CODE 

R_FPINISH . « « . . L NEAR D435 CODE 

R_WAITING. . . ‘ F L NEAR D41D CODE 

SCC CTEOUAS 2 « 2.4 @ Oe. wow « Number 0050 

SCCUCTLB. = is 6 ee & & & wD & Number 0052 

SCG.DBIT «© « | & wo we me we we ww L BYTE F62E CODE 

SCC_FE « « % « @ wy © 6 « & Ss @ Number 0040 

SCC_GB SO Oe, ee ae we, N PROC E94D CODE Length =000D 
SCC ANT? « «6 © & SG ow sw -w Bote N PROC F573 CODE Length =OOBF 
SCC UNO FES « «4 © 0 @ @ we ee L NEAR E8AD CODE 

SCC_NG_OE. « «© « © @ 8% @ & #6 L NEAR’ E8&BB CODE 

SCC.NO_PE. «© ¢ 6 Ss 2 6 *@ &% & % L NEAR’ E8B4 CODE 

SCC _NOLRXD 3 6 © ss & we @ 2s L NEAR’ E89F CODE 

SCC WO-TXD. 6 2 wb. Ga ws we we ww L NEAR’ E898 CODE 

SCC_OE « « © es & B&B Se ww @ Number 0020 

SCC_PB « 2 © 4 < tet eT N PROC’ E91B CODE Length =000F 
SiCCJPE)  &@ ca: wi a) H-ta e Number 0010 

SCCUPWRUP. 2 © 6 «© © 6 @ 3 fs L NEAR F623 CODE 

SCC_RID. # «6 He HO eH HH 8 Number 0001 

SCC_STAT . ie Gi. dar Gok ee. @ L NEAR’ E88A CODE 

SCC TRL. 3 2) 2 @ 6 -@ € Be 6 % * L WORD E2C6 CODE 

SCC_TZID: « % ac os. © Bw @ Number 0004 

SCRL_LOCK_KEY. . & «-« F Number 0046 

SCRL_LOCK_MODE . . «. «© » © we «© Number 0010 

SCRL_LOCK_SHIFT. . . © «© s+ #© «© «@ Number 0010 

SECTORS_PER_TRACK. . «. «© «© «© «© Number 0011 

SECT_NOT_FOUND . . «© «© «© «© « « « Number 0008 

SEEK_BZs «© a & we ee 6H HS ES Number 000B 


cee rere eee eee errr eee 
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Listing 


SEEK_ERROR . 
SEEK_STATUS. . 
SELECT_PORT. . . 
SEND_CDB_BYTE. . 
SENSEO_MSK ... 
SENSE_BX.... 
SENSE_ERR. . .. 
SERIAL_IO. ... 
SERIAL_T_OUT. . 
SET DS 4 vu. 4. « 
SET_DS_WORD. . . 
SHOW_SENSE ... 
STACK_ROM. ... 
STACK_SEG. ... 
STATUS... 
STATUS_INT . 
STATUS PORT. 
STOP_DISK. . 
SWITCH_BITS. 
SWITCH_PORT. 
SYS_CONF_A.. 
SYS_CONF_B.. 
SBObs i a 4 % 
S_ERR. .... 
SUGET. 6 @ > % 
SINT. & 3 -@ Sv « 
SOEP.e i #6. 05 
SNOPs & a % « 
' eo 
SOUT «6 «% \s 
TOCMDs < a « % 
TOCOUNT. . ... 
THOMD's sec « < 
TICOUNT, . 6 « « 
TOCMDs, a: spon % 
T2COUNT. . . 
TIME_OUT.... 
TST_DRV_RDY_BX . 
TST_DRV_RDY_INT. 
ToODAYs Bao iB 


to. + #. « 


pe | a ee 
T_HI_ORDER... 
TING. «2 2 & w % 
TIN: 24 1 ee Sw 
T_LOW_LORDER. . . 
TONFES © @ & Gs 
THWFF. « « 
TLOFLs « « « 
T_OVERFLOW . 
T_SET. oe 
VECTOR... 
V_3x8. . ie 38 
Vi6845 «ws « @ « 
V_APAGE. . . .. 
V_BASE6845 .. . 
VLBELL s« 6 » « « 
VBS ww sw € % 
VCE Re 2 ee a 
V_CLR_BOT. ... 
V_CLR_FAST.. . 
VICLRIFLP. « © 6 
VoCL RIGHT © & 3 
VCERLLO. a % 
VCE ROGLP 4. a 
VCLR_NAT. ss 
V_CLR_PAST 
V_CLR_ROW. 
V_CLR_TOP. 
V_COL. .. 
V_COLORPAL 
V_COLOUR... 


eee 6 


V_CURPOS ... 

V_CURSIZE. ... 
V_CURS_ POS... 
V_CURS_TYPE. .. 
VIDATAL 3 « « 
V_DATA2. « « 
V_DISALLOW . 
VFPOS . + 
V_FPOS_O . 
V_FPOS_LP. 
V_HEIGHT . 
Vi2I0 & « % 
V_KCLEAR . 
V_KSCROLL. 


VLF.. ; 
V_LROW . ‘ 
V_MD_40. é 
V_MD_80. ‘ 
V_MDCLR.... 
V_MD_CLR2K. .. 
V_MD_CLR_8K. . . 
V_MD_CLR_GRAPHICS 
V_MD_DBL.... 

V_MD_ENABLE. . . 

V_MD_GRAPH... 


eo @ 2 =e 


es: 6 @ & © 8 


oe © ew 


oc e © 6 


ee 8 sa 


cece ee PR So eo & © 


Zrrrsr2ZzeZrrrrrrrsrrr rrr rrr rer ser restr e errr srrrees 


zz 
ec 
BB 
oo 
® ® 
Lee | 


Sik 


Serre rer eee 


DATA 


CODE 


CODE 
DATA 
CODE 
CODE 
CODE 
CODE 


CODE 


CODE 
DATA 


CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 
CODE 


Length =0056 
Length =0004 
Length =0006 


Length =0013 


Length =0007 


Length =007E 


Length =0037 


Length =0047 


Length =000E 


Length =0025 


Length =002C 


Length =0008 
Length =001E 
Length =000E 
Length =0020 
Length =0058 


Length =001E 


Length =003F 


ROM BIOS 


Listing 

V_MD_LEN . . »- ee « nies L WORD FOE4 CODE 

V_MD_MONO. . . «© «© « i ee L BYTE FOD4 CODE 

V_MDWID... é - ‘ L BYTE FOEC CODE 

V_MODE ae . L BYTE 0049 DATA 

V_MV . . : . ja a L NEAR F295 CODE 

V_MV_DN. ° . L NEAR’ F370 CODE 

V_MV_END ‘ 7 a: oe L NEAR F2F4 CODE 

V_MV_FLP ... .- a. ae « L NEAR F2E7 CODE 

vV_MV_HI i % o% ee oe L NEAR F2AA CODE 

V_MV_LO. . - eC ee ee L NEAR’ F2BO0 CODE 

V_MV_LP. . c * ss. GR L NEAR F2A0 CODE 

V_MV_NXT e 3 a *@ ic L NEAR F2CA CODE 

V_MV_PAST. Se as Gee ee Ay 8 L NEAR F2E5 CODE 

V_MV_ROW oa Oe, Ter SS ke Go, L NEAR F2D1 CODE 

VINOP. c awh Se BOS SH OS L NEAR’ FOA3 CODE 

V_OUT_BYTE . . - «© «© © © © © @ N PROC F273 CODE Length =000C 
V_OVR_NOT_OK . «. »- e+ © © © e© © L NEAR F1C4 CODE 

VIOVRLOK 2 se ee HHH HH L NEAR F1C6 CODE 

VIPAGE «© «© ws ee & & © % iy +9 N PROC F22C CODE Length =0047 
V_PAGE_O 2. 2. we se we ee wees L NEAR F23E CODE 

V_PARMS. . . s+ © «© «© © a & 8 L BYTE FOA4 CODE 

V_POINTER. . 2. 2 + + se ee ee Number 03B4 

V_POSN . sg sc ee eH EH OY N PROC F52B CODE Length =0011 
VERAC. «6 6.8 Bo we ww OE eH N PROC F37C CODE Length =002A 
V_RAC_INBLANK. . ». - + © s+ s © + L NEAR F398 CODE 

V_RAC_LINLINE .... . 5 “fa. L NEAR F392 CODE 

V_RESET_BX . .. + + «+ © a Sa fg L NEAR D616 CODE 

V_R_CURS_POS . . «© + © © © we es N PROC F215 CODE Length =0017 
V_SCRL_DN. . 2. «© © © © © © © © N PROC F35B CODE Length =0021 
V_SCRL_MODE_7. . »« «© «© © © © © © L NEAR F356 CODE 
V_SCRL_MV_AND_CLR. . - s+ s+ © e + L NEAR F50C CODE 

V_SCRL_POS 3. « 6 « bee we Hw N PROC F4DE CODE Length =002F 
VSCRL_RET 2. 2 es es eee we oe 8 L NEAR F34B CODE 

V_SCRL_TTY . . «© sw « «# ‘mw % L NEAR F491 CODE 
V_SCRL_TTY_GRAPHICS. . oe © * L NEAR F4AO CODE 

V_SCRLLUP. « 2s we se we we we ewe N PROC F27F CODE Length =00DC 
V_SET_CURS . 2. © se se ee se # L NEAR F210 CODE 

V_SET_CUR_POS. eo ae ew L NEAR F256 CODE 

V_SET_MODE . . «. «© © © © © @ * N PROC FOFC CODE Length =00ED 
V_SET_MODE_COLOR . . «+ + s+ e© «© + L NEAR F117 CODE 

V_SET_MODE_LP. . . «©» + + © © » L NEAR F147 CODE 

V_SET_NEW_CUR. . oe ey a we we L NEAR F48C CODE 

VSTAT « «© © eH w @ io a « @ N PROC F4CF CODE Length =000F 
VIB. «2 @ ©) % B BGs « * L WORD FO45 CODE 

V_TERMINAL . . «ww + so N PROC F446 CODE Length =0089 
V_TERM_NOBELL. . . « © «© «© © @ L NEAR F44D CODE 

V_TERM_NOP . 2. © © © © © © © @ L NEAR F4BB CODE 

V_TERM_RET . . . «© © © © © © © @ L NEAR’ F4B9 CODE 

VITOR. 6s oe ao Dw . L WORD OO4E DATA 

VIXTLDN «6 we ew 2  & ‘ L NEAR F364 CODE 

VITXT_MD 6.6 eK HHH SE BH N PROC F53C CODE Length =0012 
VIXTOK 2c te eek ee HS L NEAR F54C CODE 

VITXT_RAC. 2. on we Be RS EH Ow L NEAR F384 CODE 

VTE UP wwe ae © 2 ‘ L NEAR F287 CODE 

V_TRT_WACK 2 6% ee we eH Oe L NEAR F3AE CODE 

VIISEWC caw eH KR He we eS L NEAR’ F3E7 CODE 

viwac. .. ae oa . a) N PROC F3A6 CODE Length =0039 
V_WAC_END. a @ we * L NEAR F3DA CODE 

V_WAC_HI . ) oe oe ee eh ee @. we L NEAR F3C5 CODE 

V_WAC_LO . « 5» © © © © @ 2 °° L NEAR’ F3CB CODE 

VW 6 @ aoe ems Woes N PROC F3DF CODE Length =003B 
V_WC_LEND . . «© «© «© «@ « : < L NEAR F415 CODE 

VOWCUBT. «6b « © .2 0s % ‘ F L NEAR’ F3FE CODE 

V.WCE_LO. « 1 8 8 8 % L NEAR F404 CODE 

V_WC_NEXT. ... . L NEAR’ F3FE CODE 

V_WIDTH. ew: ; L WORD OO4A DATA 

Wl wos Bm eS Sw H a S ‘ oy a L NEAR D460 CODE 

W2o se ww we ww Ges 3 cor L NEAR D46B CODE 

WAIT_FOR_IRQ5. . . ‘ L NEAR D46D CODE 
WAIT_FOR_STATUS. ... ext N PROC D418 CODE Length =0023 
WBUFF_BX .....-s- Sar Number 0OO0OOF 

WBUFF_INT. A a we 4 Number OO0OOF 

WLONG_BX ar Number 0O0E6 

WRITE.BX 2 ss we Hw Hs ‘ Number OOOA 

WRITE_MODE . . . - + © e© © © « Number 0OO04B 

WRITE_PORT . . . «© © © © #© © Number 0320 

WRITE_PROTECT. . . «© © «© © © = Number 0003 

W_FINISH . . «+ © «© © «© = ‘: L NEAR D494 CODE 

W_ITS_DONE . : 7 L NEAR D486 CODE 

WLNEC. .. . L NEAR EF92 CODE 

W_NEC_RET. . L NEAR’ EFA6 CODE 

W_ONE. L NEAR’ EF4B CODE 

Warning Severe 

Errors’ Errors 

0 0 
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ROM BIOS Change List 


ROM Rev 1.1 August 10, 1984 
Aug 8 16:40 1984 fdul.sre: 
Fix random value in ])X during reset causing 


problem 

Line 73. Add 
push es 
cmp~ ah,0 ‘Is it a reset command? 
)z diskette_i01 ;Yes, so ignore drive 


‘param. 
Line 123 Add 
pop es 


Aug 8 16:40 1984 fdul.src: 
Allow verify operation without valid buffer point- 


rn er (buffer not required) 
Xxor bx,bx ‘Fool the DMAC into 
mov es,bx ‘thinking there is a full 


;segment to play with. 


Do not range check head number 
Change 

and ah,1 sblow off high 7 bits. 
to 

and ah,0O7Fh ‘blow off bit 7. 


Aug 8 16:41 1984 flags.sre: 
Change date of release in ROM 


db ‘05/03/84 — ;release marker (exactly 
°8 bytes!!!!) 
to 
f~ db ‘08/10/84’ release marker (exactly 
, 8 bytes!!!!) 


Aug 8 16:43 1984 fontl08.src: 
Change 8 X 8 font to improve italics as dis- 
played by 3rd party software 
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Change List 

AENEAN CESARE ACA RRA SLE. BE SLE PAID LOSI EEE SEO E GE BIDE LELE SLEDS EEE LETTE 

Changed 
DB 00h,00h,00h,00h 
DB 00h,00h,00h,00h : 0 
DB  07eh,081h,0a5h,081h 
DB  0bdh,099h,081h,07eh i] 
DB 07eh,0ffh,0dbh,0ffh 
DB 0c3h,0e7h,0ffh,07eh 2 
DB 0386h,07fh,07fh,07fh 
DB 08eh,01ch,08h,00h ; 3 
DB  08h,01ch,03eh,07fh 
DB 08eh,01ch,08h,00h 4 
DB 018h,03ch,0e7h,0e7h 
DB 066h,018h,018h,03ch D 
DB 018h,03ch,07eh,0ffh 
DB Offh,07eh,018h,03ch ; 6 
DB 00h,00h,018h,03ch 
DB 08ch,018h,00h,00h ‘i 
DB Offh,0ffh,0e7h,0c3h 
DB 0c3h,0e7h,0ffh,0ffh : 8 
DB 00h,03ch,024h,042h 
DB 042h,024h,03ch,00h : 9 
DB Offh,0c3h,099h,0bdh 
DB  0bdh,099h,0c3h,0ffh : a 
DB 01fh,07h,0dh,019h 
DB 078h,0cch,0cch,078h b 
DB  08ch,066h,066h,03ch 
DB  018h,07eh,018h,018h Cc 
DB 018h,014h,012h,012h 
DB 014h,070h,0f0h,060h d 
DB 01fh,011h,01fh,011h 
DB 0138h,037h,072h,020h e 
DB 018h,0dbh,03ch,0e7h 
DB 08ch,0dbh,018h,00h : if 
DB 040h,070h,07ch,07fh 
DB 07ch,070h,040h,00h , 10 
DB 01h,07h,01fh,07fh 
DB 01fh,07h,01h,00h 11 


DB  018h,03ch,07eh,018h 
DB 018h,07eh,03ch,018h 12 
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00h,033h,033h,033h 
033h,00h,033h,00h 
07fh,0dbh,0dbh,07bh 
01bh,01bh,01bh,00h 
03eh,061h,03ch,066h 
066h,03ch,086h,07ch 
00h,00h,00h,00h 
O07eh,07eh,07eh,00h 
018h,03ch,07eh,018h 
07eh,03ch,018h,07eh 
018h,03ch,07eh,018h 
018h,018h,018h,018h 
018h,018h,018h,018h 
018h,07eh,03ch,018h 
Och,06h,07fh,06h 
Och,00h,00h,00h 
018h,030h,07fh,030h 
018h,00h,00h,00h 
00h,00h,060h,060h 
060h,07fh,07fh,00h 
00h,024h,066h,0ffh 
066h,024h,00h,00h 
00h,00h,018h,03ch 
07eh,0ffh,00h,00h 
00h,0ffh,07eh,03ch 
018h,00h,00h,00h 
00h,00h,00h,00h 
00h,00h,00h,00h 
018h,03ch,03ch,018h 
018h,00h,018h,00h 
036h,036h,014h,00h 
00h,00h,00h,00h 
036h,036h,07fh,036h 
07fh,0386h,036h,00h 
018h,03eh,060h,03ch 
06h,07ch,018h,00h 
00h,063h,066h,0ch 
018h,033h,033h,00h 


ROM BIOS 
Change List 


20 


21 
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01ch,036h,01ch,03bh 
06eh,066h,03bh,00h 
018h,018h,030h,00h 
00h,00h,00h,00h 
Och,018h,030h,030h 
030h,030h,018h,0ch 
030h,018h,0ch,0ch 
Och,0ch,018h,030h 
00h,066h,03ch,0ffh 
03ch,066h,00h,00h 
00h,018h,018h,07eh 
018h,018h,00h,00h 
00h,00h,00h,00h 
00h,018h,018h,030h 
00h,00h,00h,07eh 
00h,00h,00h,00h 
00h,00h,00h,00h 
00h,018h,018h,00h 
03h,06h,0ch,018h 
030h,060h,040h,00h 
03eh,063h,067h,06fh 
07bh,073h,038eh,00h 
Och,01ch,0ch,0ch 
Och,Och,03fh,00h 
01fh,033h,03h,0eh 
018h,033h,03fh,00h 
01eh,033h,08h,0eh 
03h,033h,01eh,00h 
Oeh,01leh,036h,066h 
07fh,06h,0fh,00h 
03fh,030h,03eh,03h 
03h,0338h,01eh,00h 
Oeh,018h,0380h,03eh 
033h,033h,01leh,00h 
038fh,03838h,03h,06h 
Och,0ch,O0ch,00h 
O1eh,033h,03838h,01leh 
033h,033h,01leh,00h 


w 


01eh,033h,031h,01fh 
03h,06h,01ch,00h 
00h,018h,018h,00h 
00h,018h,018h,00h 
00h,018h,018h,00h 
00h,018h,018h,030h 
06h,0ch,018h,030h 
018h,0ch,06h,00h 
00h,00h,07eh,00h 
00h,07eh,00h,00h 
030h,018h,0ch,06h 
Och,018h,0380h,00h 
03eh,063h,03h,06h 
Och,00h,0ch,00h 
03eh,063h,06fh,06fh 
06eh,060h,03eh,00h 
08h,01ch,036h,063h 
07fh,063h,063h,00h 
07eh,033h,033h,03eh 
033h,033h,07eh,00h 
01eh,033h,060h,060h 
061h,033h,01eh,00h 
07ch,036h,033h,033h 
033h,036h,07ch,00h 
07fh,0381h,034h,03ch 
034h,031h,07fh,00h 
07fh,031h,0384h,03ch 
034h,030h,078h,00h 
01eh,033h,060h,060h 
067h,033h,01dh,00h 
063h,063h,063h,07fh 
063h,063h,063h,00h 
03ch,018h,018h,018h 
018h,018h,03ch,00h 
Ofh,06h,06h,06h 
066h,066h,03ch,00h 
073h,036h,03ch,038h 
03ch,036h,073h,00h 
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SR IL BES SITS TS OER STII EEE AT SL LL ae 


DB 078h,030h,030h,030h 


DB  030h,033h,07fh,00h 'L’ 4c 
DB  0638h,077h,07fh,06bh 

DB  0638h,063h,063h,00h "M’ 4d 
DB 063h,073h,07bh,06fh 

DB 067h,063h,063h,00h "N’ 4e 
DB 01ch,036ch,063h,063h 

DB  063h,036h,01ch,00h °O’ Af 
DB 07eh,033h,0338h,03eh 

DB 030h,080h,078h,00h 6 oa 50 
DB 01ch,036h,063h,063h 

DB 063h,036h,01ch,07h °Q’ bl 
DB  07eh,033h,033h,03eh 

DB 036h,083h,033h,00h acy 52 
DB  08eh,063h,030h,018h 

DB 06h,063h,03eh,00h ; Ss’ 315. 
DB  07eh,05ah,018h,018h 

DB 018h,018h,03ch,00h “i 54 
DB 063h,063h,063h,063h 

DB 063h,063h,03eh,00h jh ate 
DB 063h,063h,063h,063h 

DB 036h,01ch,08h,00h “V" 56 
DB  063h,063h,062,U6bh 

DB  06bh,07fh,036h,00h WW’ ay 
DB 0638h,063h,036h,01ch 

DB 036h,063h,063h,00h Xx’ 58 
DB  066h,066h,066h,038ch 

DB 018h,018h,03ch,00h “y” 59 
DB 07fn,063h,06h,0ch 

DB 018h,033h,07fh,00h wh da 
DB 08ch,030h,030h,030h 

DB  030h,0380h,03ch,00h re 5b 
DB 020h,030h,018h,0ch 

DB 06h,038h,01h,00h : ~~ 5c 
DB 08ch,0ch,0ch,0ch 

DB 0ch,0ch,03ch,00h fi 5d 


DB 08h,01ch,036h,063h 
DB 00h,00h,00h,00h —_ oe 


8-182 


00h,00h,00h,00h 
00h,00h,07fh,00h 
018h,018h,0ch,00h 
00h,00h,00h,00h 
00h,00h,03ch,06h 
03eh,066h,03bh,00h 
070h,030h,03eh,033h 
033h,033h,06eh,00h 
00h,00h,038eh,061h 
060h,061h,03eh,00h 
Oeh,06h,03eh,066h 
066h,066h,03bh,00h 
00h,00h,03eh,063h 
07fh,060h,03fh,00h 
01eh,033h,030h,07ch 
030h,030h,078h,00h 
00h,00h,03bh,066h 
066h,03eh,046h,03ch 
070h,0380h,036h,03fh 
033h,033h,073h,00h 
Och,00h,01ch,0ch 
Och,0ch,01eh,00h 
Och,00h,01leh,0ch 
Och,O0cch,0cch,078h 
070h,030h,033h,036h 
03ch,036h,073h,00h 
Olch,0ch,0ch,0ch 
Och,0ch,01leh,00h 
00h,00h,066h,07fh 
06bh,06bh,06bh,00h 
00h,00h,06eh,033h 
033h,033h,033h,00h 
00h,00h,01eh,033h 
033h,033h,01eh,00h 
00h,00h,06eh,033h 
033h,03eh,030h,078h 
00h,00h,03bh,066h 
066h,038eh,06h,0fh 
00h,00h,06eh,03bh 
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DB 0380h,080h,078h,00h : 
DB 00h,00h,03fh,060h 

DB 08ch,03h,07eh,00h 
DB 08h,018h,03eh,018h 

DB 018h,01bh,0eh,00h 
DB 00h,00h,066h,066h 

DB  066h,066h,03bh,00h ; 
DB 00h,00h,063h,063h 

DB 086h,01ch,08h,00h 
DB 00h,00h,063h,06bh 

DB 06bh,07fh,036h,00h 
DB 00h,00h,063h,036h 

DB 01ch,036h,063h,00h : 
DB 00h,00h,066h,066h 

DB 066h,03eh,06h,07ch 
DB 00h,00h,07eh,04ch 

DB 018h,082h,07eh,00h 
DB 0eh,018h,018h,070h 

DB 018h,018h,0eh,00h : 
DB 0ch,0ch,00h,00h 

DB Och,0ch,0ch,00h : 
DB  070h,018h,018h,0eh 

DB 018h,018h,070h,00h 
DB 03bh,06eh,00h,00h 

DB 00h,00h,00h,00h 
DB 00h,08h,01ch,036h 

DB 068h,063h,07fh,00h 


00h,00h,00h,00h,00h,00h,00h,00h 
7eh,81h,0a5h,81h,0bdh,99h,81h,7eh 
7eh,0ffh,0dbh,0ffh,0c3h,0e7h,0ffh,7eh 
6ch,0feh,Ofeh,Ofeh,7ch,38h,10h,00h 
10h,38h,7ch,0feh,7ch,38h,10h,00h 
38h,7ch,38h,0feh,0feh,7ch,38h,7ch 
10h,10h,38h,7ch,0feh,7ch,38h,7ch 
00h,00h,18h,3ch,3ch,18h,00h,00h 

Offh ,Offh,0e7h,0c3h,0c3h,0e7h,0ffh,0ffh 
00h,3ch,66h,42h,42h,66h,3ch,00h 
Offh,0c3h,99h,0bdh,0bdh,99h,0c3h,0ffh 
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Ofh,07h,0fh,7dh,0cch,0cch,0cch,78h 
3ch,66h,66h,66h,3ch,18h,7eh,18h 
3fh,33h,3fh,30h,30h,70h,0f0h,0e0h 
7fh,63h,7fh,63h,63h,67h,0e6h,0cOh 
99h,5ah,3ch,0e7h,0e7h,3ch,5ah,99h 
80h,0e0h,0f8h,0feh,0f8h,0e0h,80h,00h — ; 
02h,0eh,3eh,0feh,3eh,0eh,02h,00h 
18h,3ch,7eh,18h,18h,7eh,3ch,18h 
66h,66h,66h,66h,66h,00h,66h,00h : 
7fh,0dbh,0dbh,7bh,1bh,1bh,1bh,00h 
3eh,63h,38h,6ch,6ch,38h,0cch,78h 
00h,00h,00h,00h,7eh,7eh,7eh,00h 
18h,3ch,7eh,18h,7eh,3ch,18h,0ffh 
18h,3ch,7eh,18h,18h,18h,18h,00h 
18h,18h,18h,18h,7eh,3ch,18h,00h 
00h,18h,0ch,0feh,0ch,18h,00h,00h 
00h,30h,60h,0feh,60h,30h,00h,00h 
00h,00h,0cOh,0c0h,0cOh,0feh,00h,00h _ ; 
00h,24h,66h,0ffh,66h,24h,00h,00h 
00h,18h,3ch,7eh,0ffh,0ffh,00h,00h 
00h,0ffh,0ffh,7eh,3ch,18h,00h,00h 
00h,00h,00h,00h,00h,00h,00h,00h 
30h,78h,78h,30h,30h,00h,30h,00h 
6ch,6ch,6ch,00h,00h,00h,00h,00h ou 
6ch,6ch,0feh,6ch,0feh,6ch,6ch,00h 7H? 
30h,7ch,0c0h,78h,0ch,0f8h,30h,00h $ 
00h,0c6h,0cch,18h,30h,66h,0c6h,00h 7%” 
38h,6ch,38h,76h,0dch,0cch,76h,00h aga 
60h,60h,0c0h,00h,00h,00h,00h,00h “ 


18h,30h,60h,60h,60h,30h,18h,00h a 
60h,30h,18h,18h,18h,30h,60h,00h si 
00h,66h,3ch,0ffh,3ch,66h,00h,00h ad 
00h,30h,30h,0fch,30h,30h,00h,00h Po? 


00h,00h,00h,00h,00h,30h,30h,60h i 
00h,00h,00h,0fch,00h,00h,00h,00h — 
00h,00h,00h,00h,00h,30h,30h,00h od 
06h,0ch,18h,30h,60h,0cOh,80h,00h <i 
7ch,0c6h,0ceh,0deh,0f6h,0e6h,7ch,00h — ;’0’ 
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Change List 
DB 30h,70h,30h,30h,30h,30h,0fch,00h vl ol 
DB 78h,0cch,0ch,38h,60h,0cch,0fch,00h “on 
DB 78h,0cch,0ch,38h,0ch,0cch,78h,00h “Oo oo 
DB 1ch,3ch,6ch,0cch,0feh,0ch,leh,00h “a 24 
DB Ofch,0c0h,0f8h,0ch,0ch,0cch,78h,00h 70 oo 
DB 38h,60h,0cOh,0f8h,0cch,0cch,78h,00h “b oO 
DB Ofch,0cch,0ch,18h,30h,30h,30h,00h aa ie | 
DB 78h,0cch,0cch,78h,0cch,0cch,78h,00h “oe 3c 
DB 78h,0cch,0cch,7ch,0ch,18h,70h,00h ’ 39 
DB  00h,30h,30h,00h,00h,30h,30h,00h 6 et 
DB 00h,30h,30h,00h,00h,30h,30h,60h — 2b 
DB 18h,30h,60h,0c0h,60h,30h,18h,00h < oC 
DB 00h,00h,0fch,00h,00h,0fch,00h,00h "= 3d 
DB 60h,30h,18h,0ch,18h,30h,60h,00h “> oe 
DB 78h,0cch,0ch,18h,30h,00h,30h,00h ek 
DB 7ch,0c6h,0deh,0deh,0deh,0cOh,78h,00h ;@’ 40 
DB 30h,78h,0cch,0cch,0fch,0cch,0cch,0O0h ;A’ 41 
DB Ofch,66h,66h,7ch,66h,66h,0fch,00h °B 42 
DB 3ch,66h,0c0h,0c0h,0c0h,66h,3ch,00h “CC 43 
DB 0f8h,6ch,66h,66h,66h,6ch,0f8h,00h TD’ 44 
DB Ofeh,62h,68h,78h,68h,62h,0feh,00h 7H AS 
DB Ofeh,62h,68h,78h,68h,60h,0f0h,00h "HR 46 
DB 8ch,66h,0c0h,0c0h,Oceh,66h,3eh,00h “GG Ai 
DB Occh,0cch,0cch,0fch,0cch,0cch,0cch,00h ;’H’ 48 
DB 78h,30h,30h,30h,30h,30h,78h,00h “T 49 
DB 1eh,0ch,0ch,0ch,0cch,0cch,78h,00h "J 4a 
DB 0e6h,66h,6ch,78h,6ch,66h,0e6h,00h “kK 4p 
DB O0f0h,60h,60h,60h,62h,66h,0feh,00h "Il; de 
DB O0c6h,0eeh,0feh,Ofeh,0d6h,0c6h,0c6h,00h ;’M’ 4d 
DB 0c6h,0e6h,0f6h,0deh,0ceh,0c6h,0c6h,00h ;’N’ 4e 
DB 38h,6ch,0c6h,0c6h,0c6h,6ch,38h,00h "Cy 4f 
DB Ofch,66h,66h,7ch,60h,60h,0f0h,00h “P’ 50 
DB 78h,0cch,0cch,0cch,0dch,78h,1ch,00h “a ol 
DB Ofch,66h,66h,7ch,6ch,66h,0e6h,00h ok OZ 
DB 78h,0cch,0e0h,70h,1ch,0cch,78h,00h “> Do 
DB 0fch,0b4h,30h,30h,30h,30h,78h,00h ai 4 
DB Occh,0cch,0cch,0cch,0cch,0cch,0fch,00h ;U’ 55 
DB Occh,0cch,0cch,0cch,0cch,78h,30h,00h ;V’ 56 
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Oc6h,0c6h,0c6h,0d6h,0feh,0eeh,0c6h,00h;’W’ 57 


Oc6h,0c6h,6ch,38h,38h,6ch,0c6h,00h 
Occh,0cch,0cch,78h,30h,30h,78h,00h 
Ofeh,Oc6h,8ch,18h,32h,66h,0feh,00h 
78h,60h,60h,60h,60h,60h,78h,00h 
OcOh,60h,30h,18h,0ch,06h,02h,00h 
78h,18h,18h,18h,18h,18h,78h,00h 
10h,38h,6ch,0c6h,00h,00h,00h,00h 
00h,00h,00h,00h,00h,00h,00h,0ffh 
30h,30h,18h,00h,00h,00h,00h,00h 
00h,00h,78h,0ch,7ch,0cch,76h,00h 
Oe0h,60h,60h,7ch,66h,66h,0dch,00h 
00h,00h,78h,0cch,0c0Oh,0cch,78h,00h 
1ch,0ch,0ch,7ch,0cch,0cch,76h,00h 
00h,00h,78h,0cch,0fch,0c0h,78h,00h 
38h,6ch,60h,0f0h,60h,60h,0f0h,00h 
00h,00h,76h,0cch,0cch,7ch,0ch,0f8h 
Oe0h,60h,6ch,76h,66h,66h,0e6h,00h 
30h,00h,70h,30h,30h,30h,78h,00h 
Och,00h,0ch,0ch,0ch,0cch,0cch,78h 
Oe0h,60h,66h,6ch,78h,6ch,0e6h,00h 
70h,30h,30h,30h,30h,30h,78h,00h 
00h,00h,0cch,0feh,0feh,0d6h,0c6h,00h 
00h,00h,0f8h,0cch,0cch,0cch,0cch,00h 
00h,00h,78h,0cch,0cch,0cch,78h,00h 
00h,00h,0dch,66h,66h,7ch,60h,0f0h 
00h,00h,76h,0cch,0cch,7ch,0ch,leh 
00h,00h,0dch,76h,66h,60h,0f0h,00h 
00h,00h,7ch,0c0h,78h,0ch,0f8h,00h 
10h,30h,7ch,30h,30h,34h,18h,00h 
00h,00h,0cch,0cch,0cch,0cch,76h,00h 
00h,00h,0cch,0cch,0cch,78h,30h,00h 
00h,00h,0c6h,0d6h,0feh,0feh,6ch,00h 
00h,00h,0c6h,6ch,38h,6ch,0c6h,00h 
00h,00h,0cch,0cch,0cch,7ch,0ch,0f8h 
00h,00h,0fch,98h,30h,64h,0fch,00h 
1ch,30h,30h,0e0h,30h,30h,1ch,00h 
18h,18h,18h,00h,18h,18h,18h,00h 
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DB  0e0h,30h,30h,1ch,30h,30h,0e0h,00h 
DB 76h,0dch,00h,00h,00h,00h,00h,00h oe Te 
DB  00h,10h,38h,6ch,0c6h,0c6h,0feh,00h 


Aug 8 16:44 1984 graph.src: 
Solved 640 X 400 inverse video mode problem 


Changed 
test byte ptr [si],80H ‘is upper left bit of 
‘char = 0 or 1? 
to 
test byte ptr ss:[si],80H ‘is upper left bit of 
‘char = 0 or 1? 


Changed 
not byte ptr [si] ‘reverse the reversed 
‘byte for matching 
to 
not byte ptr ss:[si] ‘reverse the reversed oOo 
‘byte for matching 


Aug 8 16:48 1984 pwrup1.src: 
Changed release date and display on boot 


Changed 
banner_m db “Resident Diagnostics’ ,CR,LF 
db “Rev 1.0 May 1984”,CR,LF,LF, 
NUL 
to 
db “Rev 1.1 Aug 1984”,CR,LF,LF 
banner_m db “Resident Diagnostics’,CR,LF, 
LF 
db NUL 
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Q MS-DOS 
Device Drivers 


Overview 
MS-DOS Device Drivers 


Asynchronous Communications 
Element 


DMA Controller 


Floppy Diskette Interface and 
Controller 


Hard Disk Controller 
Keyboard Interface 
Parellel Printer Interface 


Programmable Interrupt 
Controller 


Programmable Interval Timer 
Real Time Clock and Calendar 


Serial Communications 
Controller 


Speaker 


Video Controller 
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Interested This section contains information on how to \ id 
Audience write device drivers. You may not use it often 

since many input and output capabilities are 

implemented by the BIOS routines discussed in 

Section 6. BIOS routines allow you to do general 

input and output without a detailed understand- 

ing of the hardware and shield your program 

from hardware changes. 


However, there are times when BIOS routines do 
not perform the necessary function or do so in 
an inefficient fashion. Then your own driver is 
necessary. Implementation of operating sys- 
tems, of high speed graphics packages, and of 
unusual keyboard mapping are examples of 
software which require specialized drivers. 


id 


Pro- This is a list of programmable devices. 

grammable 

Devices INS 8350B Asynchronous Communications 
Element 


INTEL 8237A DMA Controller 
NECE- uPD765 Floppy Diskette Controller 
DTC 5150BX Hard Disk Controller 
INTEL 8041 Keyboard Interface 
INTEL 8259A Programmable Interrupt 
Controller 
INTEL 8253 Programmable Interval Timer 
58174A Real Time Clock and Calendar 
AMD Z8530 Serial Communications 
Controller 
Speaker Interface | 
HD 6845 Video Controller a 


LO 
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Port 
Addresses 


I/O 
Instructions 


Overview 


A port is a place to read or write information to 
an I/O device. An I/O device is hardware which 
the CPU controls. It is both input and output 
peripherals as well as hardware such as the 
DMA controller, the Interrupt controller and the 
Interval Timer. Each device needs different 
information, but they all need some combination 
of control, status, and data. 


Each port has an address. Sixteen of the twenty 
possible address lines are available for I/O 
addressing. This means there are 65,535 possible 
port addresses. 


IN and OUT instructions distinguish an I/O 
access from a memory access. These instructions 
translate into control signals which define the 
direction and path of the data. 


The port address can be specified in one of two 
ways — fixed or variable. In the fixed method, 
the absolute port address is specified in the 
instruction. The following instruction is an 
example of fixed port addressing: 


OUT 020H, AL 


Only 8-bit port addresses can be used in this 
format. 


The variable method allows 16-bit port 
addresses to be specified. In this case, the port 
address is loaded into the DX register and then 
the DX register is used in the I/O instruction. 
An example of variable port addressing follows: 


MOV DX,03F2H 
OUT DX,AL 
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Interrupts External devices do not need the CPU’s atten- 
tion all the time. When they need servicing, they 
ask for it either by interrupting or by setting a 
polled flag. External interrupts are ignored 
when the CLI instruction has cleared the inter- 
rupt enable flag and are recognized when the 
STI instruction has set the flag. 


The first 1024 bytes of memory contain an inter- 
rupt table. This table has 255 interrupt pointers 
defining the start address of interrupt service 
routines. This is the pointer format. 


INTERRUPT POINTER 


IP 


When the CPU recognizes the interrupt, an 8-bit 
interrupt type identifies the device. The interrupt 
type is an index into the table of pointers. To 
obtain the interrupt pointer address, the type is 
multiplied by four. The CPU saves the flag reg- 
ister on the stack, disables interrupts and single 
step mode, and saves the CS and IP registers on 
the stack. Then the interrupt pointer is loaded 
into IP and CS, and control is transferred to the 
interrupt service routine. The stack looks like 
this when the service routine gets control. 
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Interrupt 


Devices 


Interrupt 
Devices 


SYSTEM STACK 


IP 


When the service routine begins, interrupts are 
disabled. Depending on the nature of the appli- 
cation, interrupts can be enabled immediately or 
just prior to releasing control. 


The service routine must preserve the value of 
all internal registers. Therefore it saves the reg- 
isters it uses on the stack. Before returning, it 
restores these registers from the stack. 


To return control to the interrupt program, the 
service routine executes IRET. All the informa- 
tion necessary to do this was carefully placed on 
the stack 


INS 8250B Asynchronous Communi- 
cations Element 

INTEL 8237A DMA Controller 

NEC uPD765_ Floppy Diskette Controller 

DTC 5150BX Hard Disk Controller 

INTEL 8041 Keyboard Interface 

INTEL 8259A Programmable Interrupt 
Controller 

INTEL 8253 Programmable Interval 
Timer 

58174A Real Time Clock and 

Calendar 

AMD Z8530 Serial Communications 
Controller 


Overview 


Block Block diagrams are a pictorial description of the 

Diagrams electrical connection between the CPU, the inter- 
face, and the external device. In general, the 
CPU’s bus signals appear on the left. The mid- 
dle of the diagram describes the internals of the 
interface. The right side of the diagram de- 
scribes the electrical interface. This physically 
connects the interface to the external device. The 
connection is often through a dual inline pack- 
age (DIP) of pins. Each pin carries one signal. 


Individual signals are represented by lines. 
Busses are shown as double lines. Each of these 
have arrows which indicate the direction of the 
data. Often they are bidirectional. 


There are several common CPU control bus sig- 
nals. There mnemonics and definitions follow: 


e A0O-A19 
These are the lines used to transmit the address 
of memory or the address of an I/O port. Only 
AO-A15 are used for I/O addressing. 


e CS 
This signal selects the chip. No reading or writ- 
ing will occur unless the device is selected. 


e D0-D7 
These are the bidirectional data lines used to 
exchange information with a memory location 
or an I/O port. D7 is the most significant bit. 


e INTO-INT7 
These are the priority interrupt request lines. See 
the description of the Interrupt Controller. 
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e IORD 
This signal indicates that an input port address 
has been placed on the address bus. The data at 
the specified port is to be placed on the data bus. 


| e IOWR 

This signal indicates that an output port 
address has been placed on the address bus and 
the data has been placed on the data bus to be 
output to the specified port. 


e RESET 
This signal resets the system to a predetermined 
state. 
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A device driver is binary code which manipu- 
lates hardware in the MS-DOS environment. A 
special header at the beginning identifies it as a 
driver, defines the strategy and interrupt entry 
points, and describes various attributes of the 
device. The file must have an origin of zero. 


There are two kinds of devices: 
Character devices 
Block devices 


Character devices perform serial character I/O 
like CONSOLE, AUXILIARY, and PRINTER. 
These devices are named and users open chan- 
nels to do I/O to them. 


Block devices are the disk drivers on the system. 
They perform random I/O in pieces called 
blocks. This is usually the physical sector size. 
These devices are not named as the character 
devices are, and cannot be opened directly. 
Instead they are identified by drive letters 
(A:,B:,C:, etc.). 


Drive letters are assigned to device drivers based 
on their ordering in the CONFIG.SYS file. Start- 
ing with the letter ‘A’, each device driver is 
assigned as many consecutive alphabetic char- 
acters as the driver has units. The theoretical 
limit is 63, but after 26 the drive letters are non- 
alphabetic (such as ] and”). 


Character devices cannot define multiple units 
because they have only one name. 


id 


| Device 


Headers 


MS-DOS Device 


Drivers 


A device header is required at the beginning of a 
device driver. A device header looks like this: 


DWORD pointer to next device 
(Must be set to -1) 


WORD attributes 
Bit 15 = 1 if char device, 0 if blk 
if bit 15 is 1 
Bit 0 = 1 if current sti device 
Bit 1 = 1 if current sto device 
Bit 2 = 1if current NUL device 
Bit 3 = 1 1f current CLOCK dev 
Bit 4 = 1 if special 
Bits 5-12 Reserved; must be set 
to 0 
Bit 14 is the IOCTL bit 
Bit 13 is the NON IBM FORMAT bit 


WORD pointer to device strategy 
entry point 

WORD pointer to device interrupt 
entry point 


8-BYTE character device name field 
Character devices set a device name. 
For block devices the first byte is 
the number of units 


The strategy and interrupt routines are in the 
same segment as this device header. 


9-9 


MS-DOS Device 


Drivers 


Pointer to 
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Field 


Attribute 
Field 
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The pointer to the next device header field is a 
double word field, offset followed by segment. 
MS-DOS chains the device headers together 
using this field. If you have a single device 
header in your driver, initialize this field to -1. If 
you have more than one device header, the first 
word of the double word pointer is the offset of 
the next driver’s Device Header. 


The attribute field is used to tell the system 
whether this device is a block or character 
device (Bit 15). Most other bits are used to give 
selected character devices special treatment and 
are meaningless on a block device. For example, 
assume that you have a new standard input and 
output device driver. Besides installing the 
driver, you must tell MS-DOS that you want this 
new driver to override the current standard 
input and standard output device. This is 
accomplished by setting the attributes to the 
desired characteristics, so you set Bits 0 and 1 to 
1. Similarly, anew CLOCK device could be 
installed by setting the appropriate attribute. 
Although there is a NUL device attribute, it is 
reserved for MS-DOS. 


The NON PC-DOS FORMAT bit applies only to 
block devices and affects the operation of the 
BUILD BPB (Bios Parameter Block) device call. 
The implementation of all block devices is PC- 
DOS software and hardware compatible. 


The IOCTL bit is meaningful for both types of 
devices. This bit tells MS-DOS whether the 
device can handle control strings with the 
IOCTL system call, Function 44H. 


MS-DOS Device 
Drivers 


Strategy and 
Interrupt 
Routines 


Name Field 


How to 
Create a 
Device 
Driver 


If a driver cannot process control strings, this 
bit is 0. MS-DOS returns an error if an attempt 
is made to handle control strings. A device 
which can process control strings sets the 
IOCTL bit to 1. For drivers of this type, MS-DOS 
calls IOCTL INPUT and OUTPUT device func- 
tions to send and receive IOCTL strings. 


The IOCTL functions allow data outside of the 
normal user’s reads and writes to be sent to the 
driver. The interpretation of this information is 
up to the driver. 


These two fields are the entry points of the strat- 
egy and interrupt routines. They are word values 
and they must be in the same segment as the 
Device Header. 


This 8-byte field contains the name of a charac- 
ter device or the number of units of a block 
device. If it is a block device, the number of units 
can be put in the first byte. This is optional 
because MS-DOS fills in this location with the 
value returned by the driver’s INIT code. 


To create a device driver, write a binary file with 
a Device Header at the beginning of the file. The 
code originates at 0. 
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MS-DOS always processes installable device 
drivers before handling the default devices. To 
install a new CON device, simply name the 
device CON. Remember to set the standard 
input device and standard output device bits in 
the attribute word on the new CON device. The 
scan of the device list stops on the first match, 
so the installable device driver takes precedence. 


MS-DOS installs the driver anywhere in 
memory; therefore, be careful with memory ref- 
erences. Do not expect the driver to be loaded in 
the same place. 


Installation MS-DOS allows new device drivers to be 

of Device installed dynamically at boot time. This is 

Drivers accomplished by INIT code in the BIOS which 
processes the CONFIG.SYS file. 


At load time, DOS searches the root directory for 
a file named CONFIG.SYS. Declare the files 
containing your device drivers using the 
DEVICE command. 


DEVICE =[C:] [path] filename [.ext] 


DOS loads your drivers as an extension of itself. 
Include a separate DEVICE command for each 
driver to be loaded. 
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Request 
Header 


Unit Code 


When MS-DOS calls a device driver to perform a 
function, it passes a Request Header in ES:BX to 
the strategy entry point. This is a fixed length 
header followed by data pertinent to the opera- 
tion being performed. It is the device driver’s 
responsibility to preserve the machine state. For 
example, save all registers on entry and restore 
them on exit. There is enough room on the stack 
when strategy or interrupt is called to do about 
20 pushes. If more stack is needed, the driver 
sets up its own stack. 


The following figure illustrates a Request 
Header. 


REQUEST HEADER -> 


BYTE length of record (the 
length in bytes of perti- 
nent data, plus the length 
of this Request Header) 


BYTE unit code 
The subunit the operation 
is for (minor device) 

(no meaning on character 
devices) 


BYTE command code 
WORD status 
8 bytes RESERVED 


If your device driver has three units, then the 
possible values of the unit code field are 0, 1, 
and 2. 


MS-DOS Device 
Drivers 
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Command The command code field in the Request Header 
Code Field can have the following values: 
Command 
Code Function 
0 INIT 
1 MEDIA CHECK 
(Block only, NOP for character) 
yi BUILD BPB . 
5 IOCTL INPUT 
(Only called if device has IOCTL) 
4 INPUT (Read) 
D NON-DESTRUCTIVE INPUT NO WAIT 
(Char devices only) 
6 INPUT STATUS i 
7 INPUT FLUSH . 
8 OUTPUT (Write) 
9 OUTPUT (Write) with verify 
10 OUTPUT STATUS . 
ial OUTPUT FLUSH o 
12 LOCTLOUTPUT 
(Only called if device has IOCTL) 
Status Word The following figure illustrates the status word 


in the Request Header. 


15 1413 12 1110987654321 0 


RESERVED 


The status word is set by the driver interrupt 
routine. 


Bit 8 is the done bit. When set, it means the 
operation is complete. 
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Bit 15 is the error bit. If it is set, then the low 8 
bits indicate the error. The errors are: 


Write protect violation 
Unknown Unit 

Drive not ready 
Unknown command 
CRC error 

Bad drive request structure length 
Seek error 

Unknown media 
Sector not found 
Printer out of paper 
Write fault 

Read Fault 

General failure 


QWPeSCmDIARMIAWNHO 


Bit 9 is the busy bit which is set only by status 
calls. 


For output on character devices: 

If bit 9 is 1 on return, a write request waits for 
completion of a current request. If it is 0, there is 
no current request and a write request starts 
immediately. 


For input on character devices with a buffer: 

If bit 9 is 1 on return, a read request goes to the 
physical device. If it is 0 on return, then there 
are characters in the device buffer and a read 
returns quickly. MS-DOS assumes all character 
devices have an input type-ahead buffer. Devices 
that do not have a type-ahead buffer return 
busy=0 so that MS-DOS does not wait for non- 
existent buffer input. 
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Media Check 
and Build 
BPB 


Init Routine 
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MEDIA CHECK and BUILD BPB are used with 
block devices only. MS-DOS calls MEDIA 
CHECK first for a drive unit and passes its cur- 
rent media descriptor byte. MEDIA CHECK 
returns one of the following results: 


Media Not Changed — current DPB and media 
byte are OK. 


Media Changed — Current DPB and media are 
wrong. MS-DOS invalidates buffers for this unit 
and calls the device driver to build the BPB. 


Not Sure — If there are dirty buffers for this 
unit, MS-DOS assumes the DPB and media byte 
are OK. If nothing is dirty, MS-DOS assumes 
the media has changed. It invalidates buffers for 


the unit and calls the device driver to build the 
BPB. 


Error — If an error occurs, MS-DOS sets the 
error code. 


MS-DOS calls BUILD BPB under the following 
conditions: 


If Media Changed is returned 


If Not Sure is returned and there are no dirty 
buffers 


The Init Routine is called only once when the 
device is installed. It returns a location DS:DX 
which is a pointer to the first free byte of 
memory after the device driver. To save space, 
this pointer method can be used to delete initial- 
ization code that is only used once. 


MS-DOS Device 
Drivers 
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Additional information that block drivers return 
is: 


® The number of units 
e A pointer to a BPB 
e The media decriptor 


The number of units determines the logical 
device names. This mapping is determined by 
the position of the driver in the device list and 
by the number of units on the device. 


BPB blocks are used to build an internal MS- 
DOS data structure for each of the units. The 
driver passes MS-DOS a pointer to an array of n 
word BPB pointers, where n is the number of 
units. If all units are the same, they can share a 
BPB to save space. This array must be before 
the free space pointer since MS-DOS builds an 
internal DOS structure starting at this free byte. 
The defined sector size must be less than or 
equal to the maximum sector size defined at 
INIT time; otherwise, the install fails. 


The media descriptor byte means nothing to MS- 
DOS. It is passed to drivers so that they know 
what parameters MS-DOS is currently using for 
a drive unit. 


Block devices are either dumb or smart. A dumb 
device defines a unit and an internal DOS struc- 
ture for each possible media drive combination. 
For example, unit 0 = drive 0 single side, unit 1 = 
drive 0 double side. In this case, media descrip- 
tor bytes mean nothing. 


MS-DOS Device 
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A smart device allows multiple media per unit. Ww 
In this case, the BPB table returned by INIT 

defines space large enough to accommodate the 

largest possible media supported. Smart drivers 

use the media descriptor byte to pass informa- 

tion about the media currently in a unit. 


Strategy routines are called with ES:BX point- 
ing to the Request Header. The interrupt rou- 
tines get the pointers to the Request Header 
from the queue that the strategy routines store 
them in. The command code in the Request 
Header tells the driver which function to 
perform. 


All DWORD pointers are stored offset first, then a 
segment. 


INIT 
Command code = 0 


INIT - ES:BX -> 


13-BYTE Request Header 
BYTE # of units 


DWORD break address 


DWORD pointer to BPB array 
(Not set by character devices) 
The number of units, break address, and BPB WS 
pointer are set by the driver. On entry, the 
DWORD points to the character after the ‘=’ on 
the line in CONFIG.SYS. This allows drivers to 
scan the CONFIG.SYS invocation line for 


arguments. 


MS-DOS Device 


Drivers 


If there are multiple device drivers in a single 
.COM file, the ending address returned by the 
last INIT is the one MS-DOS uses. All of the 


device drivers in a single .COM file return the 
same ending address. 


Media Check Command Code = 1 


MEDIA CHECK - ES:BX -> 


13-BYTE Request Header 
BYTE media descriptor from DPB 
BYTE returned 


In addition to setting the status word, the driver 
sets the return byte to one of the following: 


-1 Media has been changed 


0 Don’t know if media has been changed 
1 Media has not been changed 


If the driver can return -1 or 1 because it has 
a door-lock or other interlock mechanism, 
MS-DOS performance is enhanced because 
MS-DOS does not need to reread the FAT 
for each directory access. 


MS-DOS Device 


Drivers 
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Build BPB 
(BIOS 
Parameter 
Block) 
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Command code = 2 


BUILD BPB - ES:BX -> 


13-BYTE Request Header 
BYTE media descriptor from DPB 


DWORD transfer address 

(Points to one sector worth of 
scratch space or first sector 

of FAT depending on the value 

of the NON PC-DOS FORMAT bit) 


DWORD pointer to BPB 


If the NON PC-DOS FORMAT bit is 1, then the 
DWORD transfer address points to a sector 
scratch buffer. 


If the NON PC-DOS FORMAT bit is 0, then this 
buffer contains the first sector of the first FAT 
and the driver must not alter this buffer. 


The first sector of the first FAT must be located 
in the same sector for all media. This is because 
the FAT sector is read BEFORE the media is 
actually determined. Use this mode to read the 
FAT ID byte. 


In addition to setting status word, the driver 
must set the pointer to the BPB on return. 


To allow different OEMs to read each other’s 
disks, the information relating to the BPB for 
the media is kept in the boot sector of the media. 
The format of the boot sector is: 


Ww 


MS-DOS Device 
Drivers 


Sectors per track, number of heads, and number 
of hidden sectors are optional. They are intended 
to help the BIOS understand the media. Sectors 
per track may be redundant since it can be cal- 
culated from total size of the disk. Number of 
heads supports different multi-head drives with 
the same storage capacity but a different 
number of surfaces. Number of hidden sectors 
supports drive-partitioning schemes. 


MS-DOS Device 
Drivers 


Media The last two digits of the FAT ID byte are called 

Descriptor the media descriptor byte. Currently, the media 

Byte descriptor byte has been defined for a few media 
types. 


Bit Meaning 


0 1 = 2 sided; 0 = not 2 sided 

1 1 = 8 sector; 0 = not 8 sector 

2 1=removable; 0=not removable 

3-6 must be set to 1 

7 1 = not 80 track; 0 = 80 track 

5 1/4” disks: 
FEh 160K 
FCh 180K 
FFh 320K formatted single sided 
FDh 360K formatted single sided 
7Dh 720K 

HDU: F8h 


Although these media bytes map directly to FAT 
ID bytes which must be F8-FF, media bytes can, 
in general, be any value in the range 0-FF. 
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Command codes = 3,4,8,9, and 12 
READ or WRITE - ES:BX (Including [OCTL) -> 


13-BYTE Request Header 
BYTE media descriptor from DPB 
DWORD transfer address 
WORD byte/sector count 


WORD starting sector number 
(Ignored on character devices) 


In addition to setting the status word, the driver 
must set the sector count to the actual number of 
sectors (or bytes) transferred. No error check is 
performed on an IOCTL I/O call. The driver 
must set the return sector (byte) count to the 
actual number of bytes transferred. 


A user program can not request an I/O of more 


than FFFFH bytes and cannot wrap around in 
the transfer segment. 
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Command code = 5 


NON DESTRUCTIVE READ NO WAIT - 
ES:BX -> 


13-BYTE Request Header 


BYTE read from device 


If the character device returns busy bit = 0 
(characters in buffer), then the next character 
that would be read is returned. This character is 
not removed from the input buffer, hence the 
term Non Destructive Read. Basically, this call 
allows MS-DOS to look ahead one input 
character. 
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Command codes = 6 and 10 


STATUS Calls - ES:BX -> 


13-BYTE Request Header | 


The driver sets the status word and the busy bit 
as follows: 


For output on character devices: 

If bit 9 is 1 on return, a write request waits for 
completion of a current request. If it is 0, there is 
no current request and a write request starts 
immediately. 


For input on character devices with a buffer: 

A return of 1 means a read request goes to the 
physical device. If it is 0 on return, then there 
are characters in the device’s buffer and a read 
returns quickly. A return of 0 also indicates that 
the user has typed something. MS-DOS assumes 
that all character devices have an input type- 
ahead buffer. Devices that do not have a type- 
ahead buffer return busy = 0 so that the DOS 
does not wait for something to get into a non- 
existent buffer. 
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Flush 


Clock Device 


Command codes = 7 and 11 


FLUSH Calls - ES:BX -> 


13-BYTE Request Header 


The FLUSH call tells the driver to terminate all 
pending requests. This call is used to flush the 
input queue on character devices. 


One of the special enhancements for the Safari-3 
is the battery-backed 58174A clock-calender chip 
and related driver. This chip is integrated into 
the system as the CLOCK device and is accessed 
with the TIME and DATE command. 


This CLOCK device defines and performs func- 
tions like any other character device. When a 
read or write to this device occurs, exactly 6 
bytes are transferred. The first two bytes are the 
count of days since 1-1-80. The third byte is min- 
utes, the fourth, hours, the fifth, hundredths of 
seconds, and the sixth, seconds. 


Reading the CLOCK device gets the date and 
time; writing to it sets the date and time. 


wy 
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Asynchronous Communications 


Functional 
Description 


Block 
Diagram 


(EE 


3.6864 MHz 
OSC 
InT4 | INTERRUPT 
ENABLE |O 


Element 


The Asynchronous Communications Element 
(ACE) performs serial-to-parallel conversion on 
input data characters received from a modem 
and parallel-to-serial conversion on output data 
characters received from the CPU. You can read 
the status of transfer operations at any time. 
This device gives you modem control capability. 


The baud rate and serial interface characteris- 
tics are programmable. The ACE has a software- 
tailored interrupt system whose interrupt 
request is on INT4. 


1488 


LINE 
DRIVERS 


RESET 


-10WR 


-10RD 1489 


-8530CS 


LINE 
RECEIVERS 


INTERFACE 
CONNECTOR 
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Asynchronous Communications 
Element 


Registers 
PORT NAME READ/ DESCRIPTION 
A B WRITE 
3F8 2F8 DATA R/W __ Receive Buffer, 
W Transmitter Holding 
Register 

3F9 2F9 INTERRUPT ENABLE W See layout 

3FA 2FA INTERRUPT IDENTIFICATION R See layout 

3FB 2FB LINE CONTROL R/W _ See layout 

3FC 2FC MODEM CONTROL R/W _ See layout 

3FD 2FD LINE STATUS R See layout 

3FE 2FE MODEM STATUS R/W See layout 

3FF 2FF SCRATCH R/W _ Scratch pad register 

3F8 2F8 DIVISOR LATCH W Least significant byte 

3F9 2F9 DIVISOR LATCH WwW Most significant byte 
Layout 


INTERRUPT ENABLE REGISTER 


Enable Receive Data Ready i 


Interrupt 
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Element 


INTERRUPT IDENTIFICATION REGISTER 
O 1 


01: Transmitter Holding Reg 
Empty 

10: Receiver Data Ready 
11: Receiver Line Status © 


No interrupt pending 


LINE CONTROL REGISTER 
O 1 


01:6 Bit Word Length 
10:7 Bit Word Length © 
11:8 Bit Word Length | 
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Asynchronous Communications 
Element 


MODEM CONTROL REGISTER 


LINE STATUS 
O 
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/ Overrun Error — Character in re- 
_ceive buffer not read before 
another character transferred there 


Data Ready 
Complete character in to receive 
buffer 


Asynchronous Communications 
Element 


MODEM STATUS REGISTER 


Delta Clear To Send 
™ Modem has changed status since 
last read 


Functions IDENTIFY INTERRUPTS 
INPUT: INTERRUPT IDENTIFICATION 


REGISTER 


e READ LINE STATUS 
INPUT: LINE STATUS REGISTER 


e READ MODEM STATUS 
om INPUT: MODEM STATUS REGISTER 


e RECEIVE CHARACTER 
INPUT: DATA 


e SEND CHARACTER 
OUTPUT: DATA 


Asynchronous Communications 


Element 


Sequencing 
and Timing 
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SET BAUD RATE 

To set the baud rate, you load the divisor which 
yields the correct rate (16 x divisor = clock fre- 
quency (1.8432 MHz)/baud rate x 16) 


OUTPUT: LINE CONTROL REGISTER 
BIT 7=1 
DIVISOR LATCH - Least significant byte 
DIVISOR LATCH - Most significant byte 


SET INTERRUPTS 
OUTPUT: INTERRUPT ENABLE 
REGISTER 


WRITE LINE CONTROL 
CHARACTERISTICS 
OUTPUT: LINE CONTROL REGISTER 


WRITE MODEM CONTROL 
CHARACTERISTICS 
OUTPUT: MODEM CONTROL REGISTER 


To transmit a character, first issue a Request to 
Send and Data Terminal Ready to the Modem 
Control Register. Then wait for the Modem Stat- 
us to have Data Set Ready and Clear to Send 
set. When the Transmitter Holding Register is 
empty as indicated in the Line Status Register, 
write the character to the data register. 


To receive a character, set Data Terminal Ready 
in the Modem Control Register. Then wait for 
Data Set Ready in the Modem Status Register. 
When Data Ready in the Line Status Register is 
set, input the character from the data register. 


Asynchronous Communications 
Element 


The following table states the divisors to use to 
obtain a given baud rate. 


BAUD RATES USING 1.8482 MHz CLOCK 


BAUD RATE DIVISOR 
110 1047 
150 768 
300 384 
600 192 

1200 96 
1800 64 
2000 08 
2400 48 
3600 32 
4800 24 
7200 16 
9600 12 


If you wish to use the break control feature to 
alert a terminal in a communication system, the 
following sequence assures that no erroneous or 
extraneous characters are transmitted. 


Load an all 0’s pad character into the transmit- 
ter holding register. 


Set break when the transmitter holding register 
is empty. 


Wait for transmitter empty (Bit 6 = 1 in Line 
Status Register) and clear break. 


Note that the transmitter operates normally dur- 
ing a break sequence and can be used as a char- 
acter timer to establish an accurate break 
length. 
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If the ACE is programmmed to interrupt, the 
interrupt is on INT4. The ACE acknowledges 
the highest priority interrupt as indicated in this 
chart. The Interrupt Identification Register 
states which interrupt is pending. 


TYPE SOURCE — RESET 


Receiver Line Status Overrun Error — Read Line Status 
Register 
Parity Error 
Framing Error 
Break Interrupt 
Received Data Ready Receive Data Ready — Read data 
Transmitter Holding Transmitter Holding — Write data 


Register Empty Register Empty 
Modem Status Clear To Send — Read Modem Status 
Register 
Data Set Ready 
Ring Indicator 


Data Carrier Detect 
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Sample 
Program 


Asynchronous Communications 
Klement 


;This program sets the baud rate to 1200 baud 
LINE_CTL EQU 3FB 

DVSR_L EQU 3F8 

DVSR_M EQU 3F9 


SET_BAUD: 
MOV AL,080H -access divisor 
MOV DX,LINE_CTL ;latch 
OUT DX,AL 
MOV AX,096 ‘divisor for 1200 baud 
MOV DX,DVSR_L 
OUT DX,AL ‘least significant byte 
MOV DX,DVSR_M 
MOV AL,AH 
OUT DX,AL ‘most significant byte 
XOR AL,AL ‘turn off access to latch 
MOV DX,LINE_CTL 
OUT DX,AL 


RET 


DMA Controller 


Functional 
Description 
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The DMA controller allows devices to transfer 
data directly to and from memory without CPU 
involvement. It has four channels. 


Channel 0 has the highest priority and is used to 
refresh memory. The Interval Timer is pro- 
grammed to periodically request adummy DMA 
transfer. This creates a memory read cycle 
which refreshes memory. 


Channel 1 is available on the I/O expansion bus 
to support high speed transfer between I/O 
devices and memory. Channel 3 has the lowest 
priority. 


Channel 3 is dedicated to the hard disk con- 
troller. Channel 2 is dedicated to the floppy disk 
controller. 


The DMA controller has four transfer modes. 
Single transfer mode makes only one transfer. 
Block transfer mode continues transferring until 
the count goes from 0 to FFFFH. Demand 
transfer allows transfers to continue until the 
I/O device has exhausted its capacity. The cas- 
cade mode allows more than one DMA controller 
to be used and is not applicable in the AT&T 
Personal Computer 6300. 


When autoinitialize is requested, the original 
values of the Current Address and Current 
Count registers are restored at the end of the 
operation. 


DMA Controller 


Diagram 


The DMA controller has two types of priority 
schemes. The fixed scheme bases the priority on 
the descending value of their numbers. In this 
scheme, Channel 3 has the lowest priority. The 
second scheme is rotating priority. The last 
channel to get service becomes the lowest prior- 
ity channel. 


Compressed Timing allows greater throughput 
by compressing the transfer time into two clock 
cycles. 


TEMP WORD TEMP ADDRESS 
COUNT REG (16) REG {16) 


16 BIT BUS 
16 BIT BUS 


VO BUFFER 


OUTPUT : 
BUFFER 


+ CURRENT 
CURRENT | “\ GRD 


A8 A15 


COMMAND 


CONTROL 


DO-D1 


/O BUFFER 
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DMA Controller 


Registers 
PORT NAME 
0 CHANNEL 0 ADDRESS 
1 CHANNEL 0 COUNT 
0 CHANNEL 0 CURRENT ADDRESS 
1 CHANNEL 0 CURRENT COUNT 
2 CHANNEL 1 ADDRESS 
3 CHANNEL 1 COUNT 
2 CHANNEL 1 CURRENT ADDRESS 
3 CHANNEL 1 CURRENT COUNT 
4 CHANNEL 2 ADDRESS 
5 CHANNEL 2 COUNT 
4 CHANNEL 2 CURRENT ADDRESS 
5 CHANNEL 2 CURRENT COUNT 
6 CHANNEL 3 ADDRESS 
7 CHANNEL 3 COUNT 
6 CHANNEL 3 CURRENT ADDRESS 
7 CHANNEL 3 CURRENT COUNT 
8 STATUS 
8 COMMAND 
9 REQUEST 
A SINGLE MASK 
B MODE 
C CLEAR FLIP/FLOP 
D TEMPORARY 
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DESCRIPTION 


16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

16 bit address 

1’s complement of # of bytes 
to transfer 

See layout 

See layout 

See layout 

See layout 

See layout 

Execute prior to read or 
write of address or count 
Contains last byte of 
memory-to-memory transfer 


WO 


DMA Controller 


| aie 


| Registers 
D MASTER CLEAR W_ Any write clears controller 
E CLEAR MASK W Clear mask, all channels 
accept DMA commands 

F WRITE ALL MASK W See layout 
80 CHANNEL 0 SEGMENT W__ Address segment nybble 
82 CHANNEL 1 SEGMENT W Address segment nybble 
81 CHANNEL 2 SEGMENT W Address segment nybble 
83 CHANNEL 3 SEGMENT W__ Address segment nybble 

Layout 

COMMAND 0 , 


Memory-to-Memory Disable Memory-to-Memory Enable 


STATUS 


an 
Channel 0 Finished Transfer 


DMA Controller 


REQUEST REGISTER 


MARK REGISTER 
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DMA Controller 


WRITE ALL MASK REGISTER 
O 1 


Enable Channel 0 Disable Channel 0 


MODE 
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DMA Controller 


Functions e DISABLE CONTROLLER 
This function disables the controller. 
OUTPUT: COMMAND REGISTER 
BIT 2=1 


e MASTER CLEAR CONTROLLER 
This function clears the controller. The 
Command, Status, Request, Temporary and 


Flip/Flop Registers are cleared. 
OUTPUT: MASTER CLEAR 


e DMA READ, WRITE OR VERIFY 
This function sets up the controller to do the 
desired operation. 
OUTPUT: CLEAR FLIP/FLOP 
MODE REGISTER 
BITS 0-1 channel 
BITS 2-3 function 
BIT 4 autoinitialize 
BIT 5 address increment or 
decrement 
BITS 6-7 mode 
ADDRESS REGISTER 
16 BIT address, first output the 
LSB and then the MSB 
SEGMENT NYBBLE 
One nybble. The significant nybble 
of the segment register is in bits 
12-15. Rotate to Bits 0-3 before 
output. 
COUNT REGISTER 
16 bit 1’s complement of the # of 
bytes. First output the LSB and 
then the MSB. 
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wy 


DMA Controller 


REQUEST DMA SERVICE 
This is a software request for DMA services. 
OUTPUT: REQUEST REGISTER 


READ STATUS 
This function reads the channel status. 
INPUT: STATUS REGISTER 


WRITE COMMAND REGISTER 

This function controls the operation of the DMA 
controller. 

OUTPUT: COMMAND REGISTER 


WRITE ALL MASK REGISTER 

This function enables and disables automatic 
DMA transfer for all channels. 

OUTPUT: WRITE ALL MASKS REGISTER 


WRITE MASK REGISTER 

This function enables and disables automatic 
DMA transfers for a channel. 

OUTPUT: MASK REGISTER 


WRITE MODE REGISTER 

This function specifies the mode for the specified 
channel. 

OUTPUT: MODE REGISTER 


CLEAR MASKS 

This function clears all the masks so that all 
channels accept DMA commands. 
OUTPUT: CLEAR MASK REGISTER 
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DMA Controller 


RT TE TER EO LEE PSEA EAE IE 


Sequencing 
and Timing 


Sample 
Program 
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When the system is powered-up, it is recom- 
mended that all mode registers be set with valid 
data even if the channel is not used. 


Before loading the address and count registers, 
disable the controller (BIT 2 of COMMAND 
REGISTER) or mask the channel. This prevents 
erroneous transfers before a complete address is 
loaded. 


A write to the Clear Flip/Flop sets the controller 


so that an access to an address or count is to the 
upper and lower byte in the correct sequence. 


‘This program initializes an unused channel 


sat start-up 
COMMAND EQU 8 
MODE EQU B 
INIT_CHAN: 
MOV AL,04H ‘disable controller 
OUT COMMAND,AL 
MOV AL,041H ‘channel 1, verify, inc. 
‘addr 
OUT MODE,AL ‘single mode 
RET ‘now setup other 
‘channels 


Floppy Diskette 
Interface and Controller 


fe 
Functional The diskette interface and NEC uPD765 con- 
Description _ troller read and write 5 1/4 inch diskettes on as 
many as two drives. Single density (FM) or dou- 
ble density (MFM) formats are supported. Single 
density diskettes contain 163,840 bytes and dou- 
ble density diskettes contain 327,680 bytes. 


Each sector on the diskette contains an ID field 
and the Data field. The ID field contains the 
cylinder number, the head number, the sector 
number and the number of bytes per sector. 


The diskette controller performs 15 separate 
functions. It operates in either DMA or non- 
DMA mode. Interrupts can be enabled on INT6. 


fF 


Block 
Diagrams 


PIN # 


CLOCK & 
TIMING CIRCUIT 
500 KHz¥ CLK4 
So WRITE 


IWDA PRE- 
COMPENSATION [>o 22 
CIRCUIT 
« 
VCOSYNCG 
DATA 
SEPARATOR 0 < | 30 
“se | RDCLK 
ox | 28 
oS 26 
2 e 8 
oe 32 
tie . 20 
>< 18 
. > 24 
f \ 12 
0 |FDCRST DECODE O 14 
DRIVER |. MOTORG 10 


-MOTOR1| 16 
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Floppy Diskette 
Interface and Controller 


DO:7 (| > (> (=> REGISTERS 
BUFFER 


WR CLOCK 
WR DATA 
TERMINAL WR ENABLE 
COUNT 
PRE-SHIFT 0 
INTERFACE reel | 
— CONTROLLER _—" 
DACK READ DATA WINDOW 
INT VCD SYNC 
IORD 
-AD———- 
-WR READY 
IOWR LOGIC WRITE PROTECT/TWO 
AO INPUT ane 
PORT DEX 
— <¢—— FAULT/TRACK 0 
“CS DRIVE UNIT SELECT 0 
INTERTAGE UNIT SELECT 1 
MFM MODE 
CLK -————_ OUTPUT -RW/SEEK 
<> PORT HEAD LOAD 
HEAD SELECT 
LOW CURRENT/ 
DIRECTION 
FAULT RESET/STEP 
Registers 
PORT NAME READ/ DESCRIPTION 
WRITE 
3F2 INTERFACE OUTPUT CONTROL W See layout 
3F4 FDC MAIN STATUS REGISTER R See layout 
3F5 FDC DATA R/W_ Transfers data, commands, 


parameters, and status 
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Floppy Diskette 
Interface and Controller 


Layout 


INTERFACE OUTPUT CONTROL 


Selects drive 0 


FDC MAIN STATUS REGISTER (MSR) 


Drive O not busy 


Selects drive 1 


Drive O busy seeking 
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Interface and Controller 


STATUS REGISTER 0 


Drive 0 selected at interrupt 


STATUS REGISTER 1 


FDC can not find a data address 
mark or deleted data address 
mark during a read. 
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Floppy Diskette 
Interface and Controller 


ID address mark not detected. 


“Drive 0 selected 
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Floppy Diskette 
Interface and Controller 


RRR SA SIRI RE ELS SDE TE LR DO SO 


Parameters 

SYMBOL NAME 

DTL Data Length 

EOT End of Track 

GPL Gap Length 

HD Head 

HLT Head Load Time 
HUT Head Unload Time 


SRT 


ST0O-ST3 
STP 


USO,US1 
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MF or MFM Mode 
Multi-track 


Number of bytes/ 
sector 

Non-DMA 

Step Rate Time 


Status Registers 
Scan Test Flag 


Unit Select 


DESCRIPTION 


Only applies when there are 128 bytes per 
sector. If so, number of bytes to read or 
write. Otherwise, DTL = FF. 

Last sector number on cylinder. If there are 
8 sectors per cylinder, then EOT = 8. 

Gap 3 length between sectors. Different for 
format and read/write commands. 

Selected Head number. 

4ms to 508ms in 4ms increments for 8Mhz 
clock. In this case, 4ms. 

Oms to 480ms in 32ms increments for 8Mhz 
clock. This is the amount of time to wait 
after a read or write before the heads are 
unloaded. If a new command is issued 
quickly, this saves head load time. 
0=MF,1=MFM 

MT = 1, multi-track operation. After com- 
pleting an operation on side 0, the FDC con- 
tinues on side 1. 

O = 128 bytes, 1 = 256 bytes, 2 = 512 bytes 

3 = 1024 bytes 

0 = DMA mode, 1 = non-DMA mode 

32ms to 2ms in 2 ms increments for 8Mhz 
clock. This is the amount of time to move 
the head from track to track. At 48 TPI, 
SRT = 6 ms. At 96 TPI, SRT = 4ms. 

See layout 

STP = 1, sector by sector compare 

STP = 2, alternate sectors 

USx = 0, drive not selected 

USx = 1, drive selected 


\ id 


‘ie 


Functions 


Floppy Diskette 
Interface and Controller 


FORMAT A TRACK 

This function formats an entire track. The ID 
Field for each sector is supplied by the pro- 
grammer during the execution phase. 


OUTPUT: 


EXECUTION: 
INPUT: 


POSSIBLE 
ERRORS: 


ojMF}o} of 1} ifof a | 
0} 0 Jo} 0} of Hpjusifuso 


Number of bytes/sector 
Sector/track 
Gap Length 
Filler Byte 
Sector ID Field transfer 
Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 
Head 
Sector 
Number of bytes/sector 


Equipment check, and not ready 


Floppy Diskette 
Interface and Controller 


e READ DATA 
This function reads data from the diskette. 


ee Ewerar[sxfo[oi [2 [o_ 
0 | o | o fo] 0 fxpjusijuso 


Cylinder 

Head 

Sector 

Number of bytes/sector 

End of Track 

Gap Length 

Data Length 
EXECUTION: Data Transfer 
INPUT: Status Register 0 

Status Register 1 

Status Register 2 


Cylinder 

Head 

Sector 

Number of bytes/sector 
POSSIBLE 
ERRORS: No data, data error, data error 


in data field, and control mark 


Floppy Diskette 
Interface and Controller 


© READ DELETED DATA 
This function reads deleted data. 


 Pwerdaelsxo[apato lo 
0 | 0 }o Jo] of xpfusifuso 


Cylinder 
Head 
Sector 
Number of bytes/sector 
End of Track 
Gap Length 
Data Length 
EXECUTION: Data Transfer 
INPUT: Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 
Head 
Sector 
Number of bytes/sector 


e READ ID 
This function reads the first correct sector ID 
field. 


OUTPUT: 
olmrfofof1f of1 | o 
of Jol fof anfosifos 


EXECUTION: 

INPUT: Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 
Head 
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Floppy Diskette 


Interface and Controller 


EI 
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POSSIBLE 
ERRORS: 


Sector 
Number of bytes/sector 


Missing address mark and 
no data 


e READ TRACK 
This function reads all data fields from the 
index hole to EOT. The FDC continues reading 
even if it finds a CRC error in the ID or data 


fields. 


OUTPUT: 


EXECUTION: 
INPU? 


POSSIBLE 
ERRORS: 


ro fwrfseoTof oe] [| 
ro foo ol ofrnfusifos 


Cylinder 

Head 

Sector 

Number of bytes/sector 
End of Track 

Gap Length 

Data Length 

Data transfer 

Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 

Head 

Sector 

Number of bytes/sector 


No data, data error and missing 
address mark 


Floppy Diskette 
Interface and Controller 


°® RECALIBRATE 
This function positions the head to head 0, 
cylinder or track 0. 


© LoloToTo Tota Ta 
9 fof of o fol ofusifuso 

EXECUTION: Head repositioned 

POSSIBLE 

ERRORS: Equipment check 


e SCAN EQUAL 
This function scans for an equal data compare. 


ewr|me|sx}i fo} o | o | a 
9 | 9 Jo Jo jo }xpjusifuso 


Cylinder 
Head 
Sector 
Number of bytes/sector 
End of track 
Gap Length 
Contiguous or alternate sectors 
EXECUTION: Data transfer 
INPUT: Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 
Head 
Sector 
Number of bytes/sector 


OUTPUT: 


Floppy Diskette 
Interface and Controller 
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° SCAN LOW OR EQUAL ad 
This function scans for a low or equal data 


compare. 


OUTPUT: 


EXECUTION: 
INPUT: 


wr] me}sk{t |i fo] o | 1 
DODOODOG 


Cylinder 

Head 

Sector 

Number of bytes/sector 

End of track 

Gap Length 

Contiguous or alternate sectors 
Data transfer 

Status Register 0 ww 
Status Register 1 

Status Register 2 

Cylinder 

Head 

Sector 

Number of bytes/sector 


Floppy Diskette 
Interface and Controller 


e SCAN HIGH OR EQUAL 
This function scans for a high or equal data 


compare. 


OUTPUT: 


EXECUTION: 
INPUT: 


e SEEK 


jee |Mr peli |r] 1] o | a 
2 [8 [2 [0 fo }enjostiuay: 


Cylinder 

Head 

Sector 

Number of bytes/sector 
End of track 

Gap Length 
Contiguous or alternate sectors 
Data transfer 

Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 

Head 

Sector 

Number of bytes/sector 


This function positions the head at the requested 


cylinder. 


OUTPUT: 


EXECUTION: 


ofofofofap sa fa 
Lo Jofo fof ofxpjusifuso 


New cylinder number 
Heads repositioned 


Floppy Diskette 
Interface and Controller 


° SENSE DRIVE STATUS WwW 
This function obtains the current drive status. 
© [ooo ToToTa To To” 
(9 } 0} 0 Jo | 0] HDjusi|uso 
INPUT: Status Register 0 
e SPECIFY 


This function defines the drive parameters. 


OUTPUT: : : 
0 fofofofofofita 


SRT HUT 


| 


e WRITE DATA 
This function writes data. 


OULPUT: 
mr |r}olo folio [i 
9 | 0 JoJo [o jupjusijuso 


Cylinder 
Head 
Sector 
Number of bytes/sector 
End of Track 
Gap Length 
Data Length 
EXECUTION: Data Transfer 
INPUT: Status Register 0 
Status Register 1 wy 
Status Register 2 
Cylinder 
Head 
Sector 
Number of bytes/sector 


iS 


wy 


Floppy Diskette 
Interface and Controller 


e WRITE DELETE DATA 
This function writes deleted data. 


OUTPUT: , 
erp folo [oo 
mo fo [ole fo) anjos|use 


Cylinder 
Head 
Sector 
Number of bytes/sector 
End of Track 
Gap Length 
Data Length 
EXECUTION: Data Transfer 
INPUT: Status Register 0 
Status Register 1 
Status Register 2 
Cylinder 
Head 
Sector 
Number of bytes/sector 


Sequencing There are three phases to each function: 
and Timing 
® command - The programmer writes the required 
information to the FDC. 
® execution - The FDC performs the operation. 


e result - The programmer reads the FDC’s status. 
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Before any data can be read or written to the 
FDC the Main Status Register (MSR) must be 
read to determine the status of Bit 6 and Bit 7. 
In the command phase, Bit 6 must be 0 and Bit 7 
must be 1. In the result phase both bits must be 
1. You must wait 12 usec after a data read or 
write before reading the MSR. 


In the command phases, all output must be writ- 
ten. The same is true in the result stage. All sta- 
tus information must be read. 


During the execution phase, the FDC operates in 
DMA mode or non-DMA mode. In DMA mode, 
there is one interrupt at the end of the phase. In 
non-DMA mode, there is an interrupt after the 
transfer of each byte. In the format command, 
the ID field information for all the sectors in a 
track is sent to the FDC (cylinder, head, sector 
and bytes/sector). In DMA mode, 4 DMA 
requests per sector are issued. In non-DMA 
mode, there are 4 interrupts per sector. If inter- 
rupts cannot be handled every 13 ms in MFM 
mode or every 27 ms in FM then the FDC is 
polled. When polling, Bit 7 in the MSR functions 
just like the interrupt. 


When it is not executing a command, the FDC 
polls the drives looking for a change in drive 

ready. If there is a change, the FDC interrupts. 
You can determine the cause of the unexpected 
interrupt with the Sense Drive Status function. 


The drive motors should be off when the drives 
are not in use. However, they must be on prior to 
a drive select. 


During the execution phase of read and write 
commands, the following occurs: 


Ww 


Floppy Diskette 
Interface and Controller 


LE ENTREE EAL IIS TEI TUS NSO MRR AR ETT NS MUIR ESI IE IE ELT RIC IST SH POE IRE RBG SEI CET: 


@ The heads are loaded if unloaded. 
e The FDC waits for the head settle time to elapse. 


e The FDC begins reading the ID address marks 
and ID field. 


e When the requested sector number compares 
with the one on the diskette, the transfer begins. 


e After completion of the transfer, the FDC waits 
the head unload time before unloading the 
heads. 


The amount of data that can be transferred in 
one instruction depends on MT, MF, and N. 


Multi-Track MFM/FM_  Bytes/Sector Maximum Transfer 
MT MF N (Bytes/Sector)(Number of Sectors) 
0 0 00 128*26 = 3,328 
0 1 01 256*26 = 6,656 
i! 0 00 128*52 = 6,656 
1 | 01 256"52 = 13,312 
0 0 01 256*15 = 3,840 
0 l 02 512*15 = 7,680 
sconce imitate 
1 0 01 256*30 = 7,680 
1 1 02 512*30 = 15,360 
cic ana nnnnnaniceginlenin 
0 0 02 512*8 = 4,096 
0 | 03 1024*8 = 8,192 
1 0 02 512*16= 8,192 
yf 1 03 1024*16 = 16,384 


If a read or write terminates on error, then the 
values for cylinder, head, sector, and number of 
bytes per cylinder depends on the state of MT 
and KOT. 


ve) 
o>) 
paar 
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LAST SECTOR 
MT HD TRANSFERRED  IDINFORMATION IN RESULTS 
EOT C H S N 

Less than EOT NC NC S+1 NC 
Equal to EOT C+1 NC S=1 NC 
Less than EOT NC NC S+1 NC 
Equal to EOT C+ NC S=1 NC 
Less than EOT NC NC St+1 NC 
Equal to EOT NC LSB S=1 NC 
Less than EOT NC NC S+1 NC 
Equal to EOT Cl LSB S=1 NC 


SBR eH COO OC OO 


Se - COOre KH CO OO 


NC = No Change 
LSB = Least Significant Bit 
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The Write Deleted Data is the same as Write 
Data except that the FDC writes a Deleted Data 
Address mark at the beginning of the Data Field 
instead of the normal Data Address Mark. When 
reading deleted data, the FDC sets the CM error 
in Status Register 2 and reads the data. A Read 
Data would not read the data. If SK = 1, then 
the FDC skips the sector with the Deleted Data 
Address mark and reads the next one. 


The Gap Length is different for read, write, and 
format commands. This table suggests approp- 
riate values. 


Ww 


Floppy Diskette 
Interface and Controller 


FORMAT SECTOR SIZE 


MFM 
MFM 


128 
128 
256 
O12 
1024 
2048 
256 
256 
o12 
1024 
2048 
4096 


N SC GPL(1) GPL(2) 


00 12 07 09 
00 10 10 Le 
O1 08 18 30 
02 04 46 87 
03 02 C8 FF 
04 O1 C8 FF 
O1 12 OA OC 
O1 10 20 32 
02 08 2A o0 
03 04 80 FO 
04 02 C8 FF 
05 O1 C8 FF 


GPL(1) - Suggested GPL in read and write commands 
GPL(2) - Suggested GPL in format commands 


The scan commands terminate when a scan 
condition is met, last sector on the track is 
reached, or a terminal count is received. The 
DMA issues the terminal count when it has no 
more data to send. This chart determines the 
result of the scan. 


COMMAND STATUS REGISTER 2 COMMENT 
BIT 2 BIT 3 

SCAN EQUAL 0 1 DISKETTE DATA = PROCESSOR DATA 
SCAN EQUAL 1 0 DISKETTE DATA >< PROCESSOR DATA 
SCAN LOW OR EQUAL 0 1 DISKETTE DATA = PROCESSOR DATA 
SCAN LOW OR EQUAL 0 0 DISKETTE DATA < PROCESSOR DATA 
SCAN LOW OR EQUAL 1 0 DISKETTE DATA > PROCESSOR DATA 
SCAN HIGH OREQUAL 0 1 DISKETTE DATA = PROCESSOR DATA 
SCAN HIGH OREQUAL 0 0 DISKETTE DATA > PROCESSOR DATA 
SCAN HIGH OREQUAL 1 0 DISKETTE DATA < PROCESSOR DATA 


Scans allow the compare to be on contiguous 
sectors (STP = 1) or alternate sectors (STP = 2). 
However, for normal termination of the com- 
mand the last sector on the track must be 


compared. 
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1) 


2) 


4) 


When a seek is requested, the FDC checks its 
current position and decides in which direction 
to move. Then step pulses are issued to move the 
heads. The speed of the pulse is controlled by the 
Step Rate Time in the Specify function. While 
the drive is seeking, the seek bit in the MSR is 
set. It must be cleared by Sense Interrupt Status 
at the completion interrupt. While a drive is 
seeking, the FDC is not busy. Another seek 
command to the other drive can be requested. 


Interrupts occur as the result of: 


Entering Result Phase of: 

Read Data 

Read Track 

Read Deleted Data 

Write Data 

Write Deleted Data 

Format Track 

Scans 
The execution phase in non-DMA mode 
The Drive Ready line changing state 
The end of Seek or Recalibrate 


When the latter two occur, a Sense Drive Status 
determines the cause of the interrupt. It is man- 
datory to follow Seek and Recalibrate functions 
with a Sense Drive Status. This chart shows 
how to interpret the results of a Sense Drive 
Status. 


STATUS REGISTER 0 CAUSE 
BIT 5 BIT 6 BIT 7 
0 1 1 Ready line changed state 
1 0 0 Normal termination of Seek or 
Recalibrate 
1 1 0 Abnormal termination of Seek or 
Recalibrate 
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Sample 
Program 


The Specify command defines internal timers. 
Head Unload Time (HUT) is programmable 
from 32ms to 480ms in increments of 32ms. 
Therefore 1 = 32ms, 2 = 64ms, and F = 480ms. 
The Step Rate Time is programmable from 2ms 
to 32ms in increments of 2ms. In this case, F = 
2ms, E = 4ms, and 1 = 32ms. The Head Load 
Time is programmable from 4ms to 508ms in 
increments of 4ms. In this case, 1 = 4ms, 2 = 


8ms, 7F = 508ms. 


bd 


; GET_RESULTS 


This subroutine obtains a variable amount 
of status information in the result phase. 
; INPUT: ES:DI points to the area that receives 


the status bytes 


NEC_STATUS  EQU 3F4 


GET_RESULTS: 
MOV CX,7 


GETI1: 
MOV DX, NEC_STATUS 
IN AL,DX 
TEST AL,080H 


JZ GET1 
TEST AL,40H 
JZ GET2 


INC DX 


IN AL,DX 
STOSB 
DEC CX 
JNZ GET1 


GET2:RET 


;max. bytes in status 


sport address of MSR 
‘get MSR 

;Data register ready to 
;send or receive 

Jump if not ready yet 
‘direction bit 

Jump if wrong 
‘direction 

sport addr of data 
‘register 

;get one byte of status 
smove it to status area 
;maximum number 
Jump if not max yet 
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Hard Disk 
Controller 


Functional The DTC-5150BX hard disk controller reads and 
Description writes to a maximum of two standard 5 1/4” 
Winchester disk drives. A sector size of 256, 512, 
or 1024 bytes is selectable. The sectors can be 
interleaved in 16 different ways. 
The hard disk controller operates in DMA or 
non-DMA mode. Interrupts can be enabled on 
INT5. 
Extensive diagnostics are implemented. If a cor- 
rectable data error is discovered, the error is 
automatically corrected using ECC. 
Registers 
PORT # NAME READ/ DESCRIPTION 
WRITE 
320 COMPLETION STATUS R See layout 
REGISTER 
320 DATA R/W_ Transfers data, function bytes, and 


321 RESET CONTROLLER 


3821 STATUS 


322 DRIVE TYPE 


controller sense bytes. See layout. 
Initialize Controller 
See layout 


See layout 


W 
| R 
322 SELECT CONTROLLER W Select Controller 
R 
W 


323 CONTROL REGISTER 
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See layout 


Hard Disk 
Controller 


Layout 


COMPLETION STATUS REGISTER 


CONTROL REGISTER 


Enable DMA transfer of data 
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RE ET ES Ee 


STATUS REGISTER 
O | 1 


Controller is ready. 


CONTROL COMMAND 
O 
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SENSE BYTE O 1 


NUMBER DRIVE TYPE 
0 5 MB 

1 24 MB 

2 15 MB 

a 10 MB 

4 SQ306 

5 CDC Wren 
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Error Codes 


TYPE CODE DESCRIPTION 

0 0 No error status 

0 1 No index signal 

0 2 No seek complete within 1.0 seconds 

0 3 Write fault 

) 4 Drive not ready 

0 6 No track 0 

0 8 Seek in progress 

1 0 ID read error. ECC error in the ID field. 

i] 1 Uncorrectable data error during a read 

ii Z Address Mark not found 

I 4 Record not found. Found correct cylinder and 
head. 

1 5 Seek error. Read/Write head positioned on 
wrong cylinder and/or wrong head selected. 

1 8 Correctable data field error 

1 9 Bad sector found 

1 A Format error. An unexpected format 
discovered during the Check Track function. 

1 C Unable to read the alternate track address 

1 E Attempted to directly access and alternate 
track 

Z 0 Invalid function 

2 1 Illegal disk address. Address is beyond 
maximum. 

3 0 RAM error. Data error detected during RAM 
diagnostic 

3 1 Program Memory Checksum error 

3 zZ ECC Polynominal error 
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Function 
Parameters 


NAME 


DESCRIPTION 


CONTROL COMMAND Tells controller how to react to an error 


condition and defines step mode. See 


layout. 

CYLINDER LOW Eight least significant bits of the 
cylinder number 

CYLINDER HIGH Two most significant bits of the 
cylinder number 

ECC0,ECC1,ECC2 ECC bytes of sector. ECC0O is least sig- 
nificant byte. 

HEAD # Head number 

LUN # Logical Unit Number. Winchester Drive 
1 = Lun 0, Winchester Drive 2 = Lun 1. 

SECTOR # Sector number 

SENSE BYTE Gives detailed error information. See 
layout. 

TYPE 0 = good track, 1 = alternate track, 


Functions e 


2 = bad track, 3 = alternate bad track 


ASSIGN ALTERNATE TRACK 

This function formats the primary track speci- 
fied in the function block with the alternated 
and bad track flags set in the ID fields and with 
the track address of the alternate track written 
in the data fields. The data field is written with 
the data in the sector buffer. 


Future read/write accesses to the primary track 
cause the drive to seek to the alternate track and 
to perform the operation there. This is transpar- 
ent to the software. Alternate tracks can be 
assigned once. An alternate track cannot point 
to another alternate track. 
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OUTPUT: 


LUN PRIMARY 
HEAD # 
GY is 
HI 


PRIMARY CYLINDER 
LOW 
INTERLEAVE 
CONTROL 


BOG0EEEo 
SECONDARY 
HEAD # 
CYL HI | 0 
SECONDARY CYLINDER 
LOW 


e CHECK TRACK 
This function checks the track format on the 
specified track for the correctness of the ID fields 
and the interleave of the sectors. It does not read 
the data. 


DATA 
OUTPUT: 


Hard Disk 
Controller 


OUTPUT: 


MOO DOE 


10 


LUN HEAD # 


CYLINDER LOW 


INTERLEAVE 
CONTROL 


CONTROLLER INTERNAL DIAGNOSTICS 
This function performs the controller internal 
diagnostics. The controller checks the internal 
processor, data buffer, ECC circuit and the 
checksum. 


OUTPUT: 


COPY 

This function transfers the data blocks from the 
source unit to the destination unit. The number 
of sectors to copy is specified in the number of 
blocks field. If the field is zero, 15,777,216 sectors 
are copied. 
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OUTPUT: Ww 


MUO one 
AO 


| 
S = Source D = Destination 
e DRIVE DIAGNOSTIC 
This function performs a diagnostic on the spec- 
ified unit. It reads sector 0 on sequential tracks 
and then reads sector 0 on 256 random tracks. a 
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Hard Disk 
Controller 


7hefs} 4} sf2}ifo 
CONTROL 


FORMAT BAD TRACK 

This function formats the track with the bad 
block flag set in all ID fields. It fills the data 
field with the data pattern in the sector buffer. 
The interleave must be the same for the entire 


drive. 


OUTPUT: 


7iefs}s ts }2tifo 


INTERLEAVE 
CONTROL 
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FORMAT TRACK 

This function formats the specified track with 
no flags set in the ID fields. It fills the data field 
with the data pattern in the sector buffer. The 
interleave must be the same for the entire drive. 


OUTPUT: 


MOH 


CYLINDER LOW 
INTERLEAVE 
CONTROL 


FORMAT DRIVE 

This function formats all of the tracks starting 
with the one specified in the function block to 
the end of the drive. The selected track format is 
used. The sectors are placed on the tracks 
according to the interleave code. The data fields 
are filled with the data pattern from the sector 


buffer. 


OUTPUT: 


7 Jels]4}aj2fifo 


LUN HEAD # 


CYLINDER LOW 
INTERLEAVE 
CONTROL 


\ id 


Hard Disk 
Controller 


e INITIALIZE DRIVE CHARACTERISTICS 
This function sets up the drive with different 
capacities and characteristics. 


OUTPUT: 
f \ 

DATA 

OUTPUT: 
= 


MAX # OF CYLINDERS HIGH 


MAX # OF CYLINDERS LOW 
MAX # OF HEADS 


REDUCED WR. CUR. 
CYLINDER HIGH 
REDUCED WR. CUR. 
CYLINDER LOW 
WRITE PRECOMP. 


CYLINDER 
HIGH 


WRITE PRECOMP. 
CYLINDER 
LOW 


MAX ECC DATA BURST 
LENGTH 
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e RAM DIAGNOSTIC 
This function performs a data pattern test on 
the controller RAM. 


OUTPUT 


e READ 
This function reads the specified number of 
blocks. The function specifies the initial sector 
address. The data is transferred to the CPU. 


OUTPUT: 


CYLINDER LOW 
# OF BLOCKS 
CONTROL 


Hard Disk 
Controller 


e READ ECC BURST ERROR LENGTH 
This function transfers one byte of data to the 
CPU. This byte contains the ECC burst length 
that the controller detected for the correctable 
ECC data error during the last read function. 


OUTPUT: 


DATA 
INPUT: 


ECC BURST LENGTH 


Hard Disk 
Controller 


e READ ID 


This function reads three bytes and three ECC 
bytes from the specified sector address given in 
the function block and transfers them to the 


CPLk 


OUTPUT: 


DATA 
INPUT: 
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CPE EE EEE 


TYPE|CYL HI HEAD # 


VY 


Hard Disk 
Controller 


READ LONG 

This function reads sectors of data and ECC 
bytes from the disk and transfers them to the 
CPU. If an ECC error occurs during the read, 
the controller does not attempt to correct the 
data. 


OUTPUT: 
<7 
DATA 
INPUT: 
256/512/1024 
BYTES OF DATA 
READ SECTOR BUFFER 


This function reads one sector from the con- 
troller sector buffer. No data transfer occurs 
between the controller and the drives. 
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Hard Disk 
Controller 


OUTPUT: 


e READ VERIFY 
This function reads the specified number of 
blocks but does not transfer the data to the CPU. 
The function specifies the sector number where 
verification begins. 


OUTPUT: 


CYL HI SECTOR # 
CYLINDER LOW 


# OF BLOCKS 
CONTROL 
e RECALIBRATE 


This function positions the read/write arm at 
track 0 and clears errors in the drive. 
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Controller 


OUTPUT: 


APPEL P| 


CONTROL 


REQUEST LOGOUT 

This function retrieves the four bytes of error log 
for the specified unit. Each device has its own 
error log which is incremented every time cer- 
tain errors occur and is cleared after this func- 
tion is executed. 


OUTPUT: 


Hard Disk 
Controller 
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RETRY COUNT HIGH 
RETRY COUNT LOW 


PERMANENT ERROR HIGH 
PERMANENT ERROR LOW 


REQUEST SENSE 
This function sends the four Sense Bytes to the 
CPU as data. 


OUTPUT 


DATA 
INPUT: 


SENSE BYTE 


CYLINDER LOW 


Hard Disk 
Controller 


REQUEST SYNDROME 
This function returns the four bytes of the ECC 
syndrome to the CPU as data. 


OUTPUT: 


DATA 
INPUT: 


7 ye}s i+ is }efafo 
MSB bit offset 


LSB bit offset 


Hard Disk 
Controller 


e SEEK WT 
This function seeks to the cylinder of the speci- 
fied block. For Winchester drives capable of 
overlap seeks, this function returns completion 
status before the seek is complete. 


“yyy Pp ye 


OUTPUT: 


e TEST DRIVE READY 
This function selects the specified drive and 
verifies the drive is ready, the seek is complete, 
and there are no drive faults. 
OUTPUT: 
~~ 


Hard Disk 
Controller 


WRITE 
This function writes the data starting at the 
initial block address given in the function. 


omer FP BERET 


A 


CONTROL 


WRITE LONG 

This function writes blocks of data and ECC 
bytes from the CPU to the disk without generat- 
ing ECC for the data. 


OUTPUT: 


256/512/1024 


BYTES OF DATA 


Hard Disk 
Controller 


Sequencing 
and Timing 
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WRITE SECTOR BUFFER 

This function writes one sector’s worth of data 
to the controller sector buffer. No data transfer 
occurs between the controller and the drives. 


OUTPUT: 


There are three phases to each function: 


function initiation 
function execution 


function results 


To initiate a function, you select the controller 
with the Select Controller Register. Then you 
wait for Ready in the Status Register to be set. 
The In/Out bit and the Command/ Data bit 
should indicate function transfer to the con- 
troller. You then write six function bytes to the 
Data Register. 


If the Ready is set after this transfer, either 
there was an error in the function bytes or the 
controller is ready to receive another group of six 
function bytes and/or data. 


Ww 


Hard Disk 
Controller 


Data can be transferred in DMA or non-DMA 
mode. If the transfer is in DMA mode, the DMA 
Controller is programmed in Single Transfer 
mode (See DMA Controller). The count word is 
set to: 


(number of sectors to transfer)(bytes/sector) - 1 


If data is transferred in non-DMA, you use 
Ready, In/Out, Command/Data and Interrupt 
Request to time the transfer during execution. 


Execution begins when the last function byte is 
received. In data transfer functions, the con- 
troller temporarily stores the data in the sector 
buffer. This prevents data overruns. When the 
function completes and the Completion Status 
byte is loaded, the controller issues interrupts if 
requested. 


You clear the Interrupt Enable and the DMA 
enable bits in the Control Register after reading 
the Completion Status. This allows the con- 
troller to clear Interrupt Request and Data 
Request in the Status Register. It also clears the 
Selected bit. 


The controller does extensive error recovery. If 
an error is found, four retries are attempted. Ifa 
retry is successful, the error is not reported; how- 
ever, the retry count is incremented. 


The following errors result in a retry: 


Seek error 
Sector not found 


Uncorrectable data error 
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e Correctable data error 
e No data address mark 
e No ID address mark 
e ECC error in ID field 


On a seek error, a recalibrate and reseek is done 
by the controller. 


The following errors are accumulated in the log: 


® ECC error in ID field 

e Correctable error in data field 

e Uncorrectable error in data field 
e No ID address mark 

e No data address mark 

@ Seek error 


® Record not found 


If rereads are disabled, the controller does not 
reread before applying the ECC correction. 


When a reset is done, the controller defaults to 
the following characteristics: 


e Maximum number of cylinders = 306 

e Maximum number of heads = 4 

e Starting reduced write current cylinder = 306 
e Starting write precompensation cylinder = 0 


e Maximum ECC data burst length = 4 bits 
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The interleave factor states how many physical 
sectors logical sectors are apart. For example, if 
the Interleave Factor is 6 and there are 16 sec- 
tors in a track, then a sector looks like this: 


Physical 
Sector 0123 4 5678 9 10 11 12 18 14 15 16 
Logical 
Sector 083691215147 101316 2 5 81 14 


The track layout for 256 bytes per sector, 33 sec- 
tors per track is: 


am, FE, cyl, hd, sec, 00, F8 = 1 byte 
ecc = 3 bytes 


Track capacity = 10416 


16 = Index Gap (4E) 
10197 = 33 sectors @ 309 bytes/sector 
203 = Speed Tolerance Gap (4E) 
10416 


309 bytes/sector including ID and overhead 


The track layout for 512 bytes per sector, 17 sec- 
tors per track is: 


alFiclthis le 13 |aljF] 512 Je Si 
bytes |m|E Jy |d Je |c bytes |m1|8 | bytes | c 
00’s il cle 00’s data |c 


am, FE, cyl, hd, sec, 00, F8 = 1 byte 
ecc = 3 bytes 


Hard Disk 
Controller 
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Track capacity = 10416 


16 = Index Gap (4E) 
10064 = 17 sectors @ 592 bytes/sector 
336 = Speed Tolerance Gap (4E) 
10416 


092 bytes/sector including ID and overhead 


The track layout for 1024 bytes per sector, 9 sec- 
tors per track is: 


am, FE, cyl, hd, sec, 00, F8 = 1 byte 
ecc = 3 bytes 


Track capacity = 10416 
16 = Index Gap (4E) 
10125 = 9 sectors @ 1125 bytes/sector 


275 = Speed Tolerance Gap (4E) 
10416 


1125 bytes/sector including ID and overhead 


Hard Disk 


Controller 
Sample > INIT_CTLR 
Program This routine prepares the controller to 
receive a function. 
OUTPUT: Carry set if error 
SELECT EQU 322 
STATUS EQU 321 
CONTROL EQU 323 
INIT-CTLR: 
MOV DX,SELECT ‘Select Port Address 
OUT DX,AL ‘Output anything 
MOV DX,CONTROL _ ;Control Port Address 
MOV AL,3H ;Enable interrupts and 
‘DMA 
OUT DX,AL 


MOV DX,STATUS ‘Status Port Address 
INIT1: 


IN AL,DX ‘Get status 
TEST AL,1H sis it ready? 
LOOPZ INIT1 ‘Loop if not ready 
CMP AL,DH ‘Jump if ready for a 
JE INIT2 ‘function and selected 
STC ‘Flag error 
RET 

INIT2: 
CLC 
RET 


9-93 


Keyboard 


Interface 
Functional The keyboard interface converts the parallel a 
Description data into serial data for transmission to and 
from the keyboard. 


To provide maximum flexibility in defining key- 
board operations, the keyboard uses scan codes 
rather than ASCII codes. In addition, all keys 
generate a make scan code when pressed anda 
break scan code when released. The break scan 
code is 80H plus the make scan code. 


The keyboard is responsible for keeping track of 
the amount of time a key is depressed and for 
generating the repeat key signal. All the keys 
have this repeat function. 


Block 
Diagram nize 
PAO D INT1 
a 


+5V 
4.7K OHM 


KEYBOARD 
DATA 


KEYBOARD CLOCK 


. 4.7K OHM \ j 
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Interface 


Registers 
PORT NAME 

60 DATA 

60 DATA 

60 CONTROL 

64 STATUS 
Layout 
CONTROL 


Speaker off 


R/W 


DESCRIPTION 


8 bit scan code when pressed, 8 bit 
scan code plus 80H when released 
See scan code chart. 

Keyboard command codes 

See layout 

See layout 


Speaker on 
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STATUS 


Functions @ 


Bytetoread VY 


READ STATUS 

This function allows you to determine when 
there is a character to read and when the key- 
board is ready to receive a character. 


INPUT: STATUS 


READ DATA 
This function allows you to read the scan code of 


the key that was pressed or released. 
INPUT: DATA 


WRITE CONTROL VY 
This function allows you to issue control com- 


mands to the keyboard. 
OUTPUT: CONTROL 
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e GET KEYBOARD TYPE 
This function determines if the keyboard is an 
Olivetti M20 type keyboard. 
OUTPUT: DATA REGISTER 
D 
INPUT: DATA REGISTER 
1 = Olivetti M20 keyboard 


e KEYBOARD LEDS | 
This function controls the illuminations of the 
CAPS LOCK and NUM LOCK LEDS. 
OUTPUT: DATA REGISTER 
13H 


Value Operation 


00h No operation 

i Olh Cap lock LED OFF 
02h Num lock LED OFF 
03h Both LEDS OFF 
80h No operation 
8lh Caps lock LED ON 
82h Num lock LED ON 
83h Both LEDS ON 


Any other value will cause one of the above 
operations. 


Keyboard 
Interface 


Scan Codes 


KEYNO SCAN CODE KEYNO SCAN CODE KEY NO SCAN CODE 


OoOnNoo»r WN re 


co 
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01H 
02H 
03H 
04H 
05H 
06H 
07H 
08H 
09H 
OAH 
OBH 
OCH 
ODH 
OKH 
OFH 
10H 
11H 
12H 
13H 
14H 
15H 
16H 
17H 
18H 
19H 
1AH 
1BH 
1CH 
1DH 
1EH 
1FH 
20H 
21H 
22H 
23H 


24H 
25H 
26H 
27H 
28H 
29H 
2AH 
2BH 
2CH 
2DH 
2EH 
2FH 
30H 
31H 
32H 
33H 
34H 
30H 
36H 
37H 
38H 
39H 
3AH 
3BH 
3CH 
3DH 
3EKH 
3FH 
40H 
41H 
42H 
43H 
44H 
45H 
46H 


47H 
48H 
49H 
4AH 
4BH 
4CH 
4DH 
4EH 
4FH 
00H 
51H 
52H 
53H 
54H 
50H 
56H 
o7H 
58H 
o9H 
5AH 
oBH 
oCH 
ODH 
SEH 
oFH 
60H 
61H 
62H 
63H 
64H 
65H 
66H 
67H 
68H 


UO 


Keyboard 
Interface 


Sequencing Tosendacharacter to the keyboard, wait for Bit 
and Timing 1 of the Status Register to be set and write the 
byte to the data register. 


To receive a character, wait for Bit 0 of the Sta- 
tus Register to be set and read the character. 
The keyboard interface can be programmed to 
interrupt on INT1 when there is a character to 
read. 


Sample ‘This program sets the CAPS LOCK LED 
Program STATUS EQU 64 


DATA EQU 60 
SET_LED: 
IN AL,STATUS ‘read status 
TEST AL,2 ‘keyboard ready to receive 


JINZSET_LED ‘input? Jump if ready. 
MOV AL,013H ‘keyboard LED command 


OUT DATA,AL 
SETI: 
IN AL,STATUS ‘read status 
TEST AL,2 ‘ready to receive input? 
JINZSET1 ‘jump if not 
MOV AL,81 ‘-CAPS LOCK 
OUT DATA,AL ‘write out code 
RET 


Parallel Printer 
Interface 


Functional The parallel printer interface connects to print- 

Description _ ers with a Centronics-like parallel interface or 
any other device with identical interface charac- 
teristics. The input and output signals are pre- 
sented to the external device through a 25-pin 
“D” type connector. 


The interface has 5 buffered outputs — data, 
strobe, initialize printer, automatic linefeed, and 
select. These can be read and written. In addi- 
tion, the interface has five inputs — acknowl- 
edge, busy, paper out, error and select. An inter- 
rupt can be enabled on INT7. 


WRITE 
DATA 
LATCH 


CLOCK 


READ 
DATA 
BUFFER 


ENABLE 


COM- 


MAND 
DECODER 


INTERFACE 
CONNECTOR 


Registers 
PORT # NAME READ/ DESCRIPTION 
WRITE 
378 DATA R/W Print character 
379 STATUS R See layout 
387A CONTROL R/W See layout 
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Layout 


STATUS 


CONTROL 


Parallel Printer 
Interface 


Functions @ 
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RESET 
After a power on or a hardware reset, the data 
buffer is cleared and the control register is 
initialized to: 

bit 0: 0 

bit 1: 0 

bit 2: 0 

bit 3: 0 

bit 4: 0 


WRITE DATA 

This instruction enables the data on the data 
bus to be written to the printer data bus. The 
actual writing occurs when the strobe line is 


activated. 
OUTPUT: DATA 


WRITE CONTROL 
This instruction inverts DO, D1, and D3 on the 
data bus and writes the data to the control regis- 


ter. If D4 is a 1 then interrupts are requested. 
OUTPUT: CONTROL 


READ DATA 

This instruction enables the data on the printer 
data bus to be read onto the data bus. It normal- 
ly is the last character written to the printer. 
INPUT: DATA 


READ CONTROL 
This instruction enables the data on the printer 
control lines and the interrupt control bit to be 


placed on the data bus. 
INPUT: CONTROL 


READ STATUS 

This instruction enables the data on the printer 
status lines to be placed on the data bus. 
INPUT: STATUS 


c™ 


Sequencing 
and Timing 


Parallel Printer 
Interface 


To send a character to the printer, the character 
is put on the data bus. When the printer is not 
busy, it is ready to accept the next character. 
The character must be strobed into the printer 
by setting the strobe bit to 1 for at least 5 p- 
seconds and then resetting it. 


Interrupt can be enabled on INT7 by writing D4 
= 1 in the control register. An interrupt will be 
triggered everytime Bit 6 of the status register 
goes from 0 to 1 (end of the acknowledge cycle 
from the printer). 


To initialize the printer, first select it. Then issue 


the initialize command setting the automatic 
line feed and interrupt parameters. 
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Parallel Printer 


Interface 
Sample - PRINT_CHAR 
Program Send character to printer and get status 


INPUT AL- character to print 
OUTPUT: AL- status 


DATA EQU 378H 


PRINT_CHAR: 
MOV DX,DATA ‘set data port 
OUT DX,AL ‘put char on data 
‘line 
INC DX sget status port 
IN AL,DX ‘read in status 
TEST AL,080H ‘is the printer busy? 


JINZ PRINT _NOT_BUSY ;jump if not busy 


PRINT_NOT_BUSY: 


MOV AL,ODH strobe high 

INC DX ‘get control port 
OUT DX,AL ‘to control register 
NOP ‘walt 

NOP ‘walt 

MOV AL,OCH ‘strobe low 

OUT DX,AL sto control register 
DEC DX ‘get status port 
IN AL,DX ‘read in status 
RET 
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Programmable 


Interrupt Controller 

Functional The Intel 8259A Programmable Interrupt Con- 

Description _ troller (PIC) manages external interrupts. It 
receives requests from peripheral equipment, 
decides which request has the highest priority, 
and issues an interrupt to the CPU. Each PIC 
handles 8 maskable priority interrupts. PIC’s 
can be cascaded allowing up to 64 priority inter- 


rupts. However, on the AT&T Personal Comput- 
er 6300 this is not done. 


Each interrupt device runs to one of eight inter- 
rupt lines (INTO-INT7). If more than one device 
interrupts at once, the PIC decides which device 
to service according to one of several schemes. 


The following schemes apply to a single PIC: 


e Fully Nested Mode 
This is the default mode. The interrupt requests 
have an ordered priority from 0 (highest) to 7 
(lowest). The highest priority is acknowledged 
first and those of lower priority are inhibited. 


@ Special Mask Mode 
This mode is similar to fully nested mode except 
that the interrupt mask register (IMR) deter- 
mines which interrupts are disabled. 


® Polled 
This mode allows the CPU to poll the devices. It 
is selected by disabling interrupts with the CLI 
instruction. Periodically the CPU polls the PIC 
oo” to receive the interrupt type of the highest prior- 
| ity device requesting service. 
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Diagram 
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Automatic Rotation 

In this mode, a device receives the lowest prior- 
ity after it is serviced. All other devices have 
their priorities adjusted accordingly. The next 
highest interrupt line receives the highest 
priority. 


Programmable Rotation 
In this mode, the programmer declares the low- 
est priority device. 


The PIC keeps track of devices that are waiting 
for service in the interrupt request register (IRR). 
If not in polled mode, the PIC notifies the CPU 
of the pending interrupt. When it receives an 
interrupt acknowlege from the CPU (INTA), it 
sends the interrupt type of the device to the 
CPU. The device is then in-service. This is noted 
in the in-service register (ISR). The type of INTO 
is programmable. It must be a multiple of 8. 


After the interrupt service routine services the 

interrupt, it notifies the PIC of end of interrupt 
(EOI). The device is then removed from the in- 

service register. 


-INTA INT 


© 
CONTROL LOGIC 
-\ORD-—=0 
-IOWR O 
LOGIC * Rvice ( RESOLVERK REQUEST 


1 GE phe 


CASCADE 
BUFFER/ 
OMPARATOR 


INTERNAL BUS 


Programmable 
Interrupt Controller 


or 


Registers 
PORT # NAME 
20 INIT COMMAND WORD 1 (ICW1) 
21 INIT COMMAND WORD 2 (ICW2) 
VAN INIT COMMAND WORD 3 (ICW3) 
pall INIT COMMAND WORD 4 (ICW4) 
21 OPERATION COMMAND WORD 1 
(OCW1, IMR) 
20 OPERATION COMMAND WORD 2 
(OCW2) 
20 OPERATION COMMAND WORD 3 
(OCW3) 
20 IN-SERVICE REGISTER (ISR) 
r 6 (NN 21. INTERRUPT LEVEL 
| 20 INTERRUPT REQUEST REGISTER 


(IRR) 


READ/ 
WRITE 


DESCRIPTION 


See layout 

INTO interrupt type, 
multiple of 8 
Cascade mode only 
See layout 

Interrupt Mask 
Register 

See layout 

See layout 


See layout 
See layout 


See layout 
See layout 
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ICW1 


ICW4 


always 1 (8086) 
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OCW1 or INTERRUPT MASK REGISTER 


INTO disabled 


OCW2 
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OCW3 


IN SERVICE REGISTER 
O 1 


_INTO not in service INTO in service 
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Programmable 
Interrupt Controller 
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Functions ¢ INITIALIZATION 
This function prepares the PIC to accept inter- 
rupts by setting it to an initial state. 
OUTPUT: ICW1 
ICW2 
ICW3 (Cascaded PIC’s only) 
ICW4 


e SET SPECIAL MASK MODE 
This function sets the priority scheme to Special 
Mask Mode. The Interrupt Mask Register (IMR) 
defines enabled priorities. 
OUTPUT: OCW3S BITS 5-6 = 3 
IMR 


e RESET SPECIAL MASK MODE 
This function resets the priority structure to the 
Fully Nested Mode. The IMR is ignored. 
OUTPUT: OCW3 BITS 5-6 = 1 


e SET POLLED MODE 
This function sets the priority scheme to Polled 
Mode. The CLI instruction must be executed to 
disable external interrupts. The next read 
fetches the interrupt level. 
OUTPUT: OCW3 BIT 2=1 
INPUT: _ interrupt level 


e AUTOMATIC ROTATION OF PRIORITIES 
AT EOI 
This function requests an automatic rotation of 


priorities at EOI. 
OUTPUT: ICW2 BITS 5-7 = 5 


e PROGRAMMED ROTATION AT EOI 
This function requests a specific change in prior- 
ities at EOI. 
OUTPUT: ICW2 BITS 5-7 = 7 
ICW2 BITS 0-2 = level of lowest 
priority 
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ROTATION OF PRIORITIES INDEPENDENT 
OF EOI 
This function requests an immediate change in 
priorities. 
OUTPUT: OCW2 BITS 5-7 = 6 
OCW2 BITS 0-2 = level of lowest 
priority 


SPECIFIC END OF INTERRUPT (SEOIT) 
This function is issued in an interrupt service 
routine to declare end of interrupt service for the 
specified level. 
OUTPUT: OCW2 BITS 5-7 = 3 
BITS 0-2 = interrupt level 


NON-SPECIFIC END OF INTERRUPT (EOI) 
When the PIC is operating in Fully Nested 

Mode, it can determine which interrupt is com- 
pleting. This function signals completion of an 


interrupt service routine. 
OUTPUT: OCW2 BITS 5-7 = 1 


AUTOMATIC END OF INTERRUPT 
This function requests the PIC to declare end of 
interrupt automatically after delivering the 
interrupt to the CPU. 

OUTPUT: ICW4 BIT 1 =1 


READ IRR 
This function reads the devices requesting 
service. 

OUTPUT: OCW3 BITS 0-1 = 2 

INPUT: IRR 


READ ISR 

This function reads the in-service register. 
OUTPUT: OCW3 BITS 0-1 = 3 
INPUT: ISR 
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e READ IMR ed 
This function reads the interrupt mask register. 
INPUT: OCW1 


Sequencing When the ICW1 command is issued, the initiali- 
and Timing zation process begins. The following automati- 
cally occurs: 


e IMRis cleared. 

e INT7 is assigned the lowest priority. 
e Single mode is assumed. 

e Special Mask Mode is cleared. 

e Astatus read fetches IRR. Nas 


e If Bit 0 equals zero, then ICW4 functions are set 
to zero. 


Next ICW2 is output. 1CW3 is skipped in all sin- 
gle PIC systems. If the ICW4 was requested by 
ICW1 then it is output. This completes 
initialization. 


Once the initialization process is complete, the 
PIC is ready to accept interrupts. Any of the 
functions to change the priority scheme can be 
executed. In addition, the IRR, IMR, and ISR 
can be read. 


If automatic EOI is not specified then the inter- 

rupt service routine must declare EOI. Either 
specific or non-specific EOI can be used depend- 

ing on the priority scheme in use. 
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When a write command is issued to the PIC, 480 
nanoseconds must elapse before another com- 
mand is issued. In the read case, 395 nanosec- 
onds must elapse. 


Sample =; 

Program ;SEND_SEOI 
Send end of INT1 service at the end of the 
interrupt service routine. 


OCcw2 EQU 20 ;port address of OC W2 


COMMAND EQU 61 ;6=SEOI,1=INTI1 
SEND_SEOI: 
MOV AL,COMMAND - ;set AL = command 
MOV DX,OCW2 ;set DX = port address 
OUT DX,AL ‘send command 
STI ;enable external interrupts 
RET return to service routine 
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The Intel 8253 Interval Timer has three identi- 
cal, 16-bit, settable, decrementing counters. Each 
counter is totally independent. The counters 
have either a BCD or binary value and operate 
in one of five modes: 


Interrupt on Terminal Count 

The output remains low after the mode is set. It 
continues low after the counter is loaded until 
the counter counts down to zero. Then the output 
goes high. It remains high until a new mode is 
selected or a new count is loaded. 


Programmable One-Shot 

The output goes low one count following the ris- 
ing edge of the gate input. The output goes high 
on the terminal count. 


Rate Generator 

The output is low for one period of the input 
clock. The period from one output pulse to the 
next equals the number of input counts in the 
count register. 


Square Wave Rate Generator 

The output remains low for one period of the 
input clock. The output remains high until one 
half the count has elapsed. If the count is odd, 
the output is high for (n+1)/2 and low for 
(n-1)/2. 


Software Triggered Strobe 

After the mode is set, the output will be high. 
When the count is loaded, the counter begins 
counting. On the terminal count,the output goes 
low for one clock period and then goes high. 


Programmable 
Interval Timer 


e Hardware Triggered Strobe 
The counter starts counting after the rising edge 
of the trigger input and goes low for one clock 
period when terminal count is reached. 


These timing diagrams illustrate the different 
modes. 


-IOWR 
-IORD 
-8530CS 
AO 28350 CHANNEL B 
————>|D/-C CONNECTOR 
Al tog PIN # 
S 
4 
23 
24 
3.6864 
MHz 
OSC . 
a 5 
OMRRECEIVERS 
INT4] INTERRUPT |. 0 6 
ENABLE 0 22 
O 8 
-ENBINT4 cas. 17 


-DSR1 INTERFACE 
-RIM CONNECTOR 


PARITY 
START STOP 


{ { 
MARKING LINE DATA | | DATA | | | DATA | | MARKING LINE 
ASYNCHRONOUS 
MONOSYNC 
SIGNAL BISYNC 


[eave [ome [on] 


EXTERNAL SYNC 


| FLAG | ADDRESS INFORMATION __| GRC1 | CRC: | FLAG | 


SDLC/HDLC/X.25 
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Programmable 
Interval Timer 


In the AT&T Personal Computer 6300 system, 
Counter 0 provides real time interrupts on INTO, 
counter 1 requests memory refreshes, and count- 
er 2 generates a pulse train for the audio 
speaker. 


Block 
Diagram 


q—cikz 
C= COUNTER GATE 2 —>TmR2GSPKR 
=2 


OUT 2 


DATA BUS 
BUFFER 


CLK 1 


(> COUNTER GATE 1 
=] 


OUT 1 


CLKO 


(7) COUNTER GATE O 
=0 
OUTO —P into 


CONTROL 
WORD 
REGISTER 


9-118 


Programmable 
Interval Timer 


Registers 


PORT # NAME READ/ DESCRIPTION 


40 COUNTER O R/W _ Provides real time interrupt INTO 
41 COUNTER 1 R/W _ Provides signals to refresh memory 
42 COUNTER 2 R/W _ Generate pulse train for the audio 


speaker 
43. CONTROL WwW See Layout 
Layout 
CONTROL 


Binary Coded Decimal 


9-119 


Programmable 
Interval Timer 


Functions e¢ 
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LOAD COUNTER 
This function allows you to set a specific 
counter. 
OUTPUT: CONTROL REGISTER 
BITS 0 binary or BCD 
BITS 1-3 mode 
BITS 4-5 1,2 or 3 
BITS 6-7 counter 
8 or 16 bit count value 


READ COUNTER 
This function allows you to read a specific 
counter. 
OUTPUT: CONTROL REGISTER 
BITS 4-5 0 
BITS 6-7 counter 


c™ 


Sequencing 
and Timing 


Programmable 
Interval Timer 


All counters must be initialized with the control 
register. The control register specifies the 
number of bytes which must be loaded. 


Whenever a read or a load command is issued, 
the requested counter bytes must be read or writ- 
ten. In the read case, two reads are necessary, 
the first for the least significant byte (LSB) and 
the last for the most significant byte (MSB). In 
the write case, the control register specifies the 
byte to write. 


1 microsecond recovery time is required between 
a read or a load and any other control signal. 


Input to the timer is 1.2288MHz. Therefore, there 
are 18.75 interrupts per second. To generate a 
1.00 KHz tone with the audio speaker, a square 
wave rate generator is used with a count of 614 
(1.2288MHz/2*614 = 1KHz). 


9-121 


Programmable 
Interval Timer 


Sample 
Program 
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 ASK_FOR_INTR 
This program requests an interrupt in 
approximately 10 usec (9765.6 nsec) 


b) 


e 
b) 


TIMER_CONTROL EQU 43 


TIMERO EQU 40 
INT_MASK EQU 21 
ASK_FOR_INTR: 
MOV AL,OFEH sallow only INTO 
interrupt 
OUT INT_MASK,AL ‘send mask 
MOV AL,00110000B ‘binary counter, 


‘interrupt on terminal 
;count, set counter 0 
OUT TIME_CONTROL,AL 


MOV AX,12 12 * 813.8 nsec 

OUT TIMERO,AL 

MOV AL,AH ‘output counter, LSB 
‘then MSB 

OUT TIMERO,AL 

RET 


wy 


Real Time Clock 
and Calendar 


Functional The real time clock and calendar keep the cur- 

Description rent data and time. All of the date and time 
fields can be read but the second fields cannot be 
written. The calendar keeps up to eight years. A 
rechargeable battery keeps the unit running 
even when the computer is turned off. 


Block 


Diagram 32.768 KHz 


I 


T 


Pod OSCILLATOR 
DIVIDERS 


D3 
D2 
D1 
DO 


—— BATTERY 
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Registers 
PORT # NAME READ/ DESCRIPTION 
WRITE 

70 TEST PORT Ww O=not test mode, 1=test mode 
71 1/10 OF ASECOND R nybble, 0-9 

72 UNITSECONDS R nybble, 0-9 

73. 10SOFSECONDS R nybble, 0-5 

74 UNIT MINUTES R/W _nybble, 0-9 

75 10SOF MINUTES R/W _nybble, 0-5 

76 UNIT HOURS R/W _nybble, 0-9 

77 10SOF HOURS R/W _nybble, 0-1 

78 UNIT DAYS R/W _nybble, 0-9 

79 10SOF DAYS R/W _nybble, 0-3 

7A DAY OF WEEK R/W _nybble, 1-7 

7B UNIT MONTHS R/W _nybble, 0-9 

7C 10SOF MONTHS R/W _nybble, 0-1 

7D LEAP YEAR W See layout 

7E STOP/START W 0 = stop, FF = start 

7F  INTERRUPT/YEAR- R/W See layout 

MOD 8 
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Layout 


INTERRUPT/YEAR MOD 8 


Real Time Clock 
and Calendar 
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Real Time Clock 
and Calendar 


Functions @ 


Sequencing 
and Timing 
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READ CALENDAR AND CLOCK 

All of the calendar and time registers are read- 
able. Those from port address 71 to 7D and 7F 
contain a nibble of data. 


WRITE CALENDAR AND CLOCK 

All of the calendar and time registers except 
seconds are writable. The registers from port 
address 74 to 7D and 7F each contain a nibble of 
data. 


To write data to the clock and time registers, the 
unit must be out of test mode and stopped. After 
writing to the clock, it must be restarted. 


To initialize interrupts, set Bit 4 in the Inter- 
rupt/Year mod 8 register. Write the register once 
and then read it in three times. 


If an update occurs while reading a register, the 
illegal code of F is returned. 


Real Time Clock 
and Calendar 


LL» 
Sample > SET TIME 
Program This routine sets the time to 12:00 noon 
TEST_PORT EQU 70 
STOP_START EQU 7E 
TENS _HOURS EQU 77 
WRITE_TIME: 
XOR AX,AX “AX =0 
MOV DX,TEST_PORT ‘setup dx 
OUT DX,AL ‘take out of 
‘test mode 
OUT STOP_START,AL — ;stop the clock 
MOV DX,TENS_HOURS | sport addr of 
-10’s of hours 
MOV AL,1 
| ] OUT DX,AL -‘ten’s of hours 
= i 
DEC DX 
MOV AL,2 
OUT DX,AL ‘unit hours = 2 
DEC DX 
XOR AL,AL 
OUT DX,AL ‘tens of minutes 
0 
DEC DX 
OUT DX,AL ‘minutes = 0 
MOV AL,OFFH 


OUT STOP_START,AL © ;start the clock 
RET 
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Serial Communications 
Controller 


Functional Z8530 Serial Communications Controller (SCC) 
Description _ performs serial-to-parallel conversion on input 
- data characters received from a modem and 
parallel-to-serial conversion on output data 
characters received from the CPU. It supports 
the following common asynchronous and syn- 
chronous data communication protocols. 


-IOWR 


-IORD 


-8530CS 


Z8350 CHANNEL B 
——P CONNECTOR 


3.6864 
MHz 
OSC 


INT4T INTERRUPT | 
ENABLE 


— 


ine) 
NOMONWM 


—_ 


-ENBINT4 


-DSR1 INTERFACE 
-RI1 CONNECTOR 


PARITY 
START STOP 


Y 
MARKING LINE | DATA | | DATA | | DATA | | MARKING LINE 


ASYNCHRONOUS 


MONOSYNC 


SIGNAL BISYNC 


EXTERNAL SYNC 


| FLAG | ADDRESS INFORMATION _| GRG1 | GRC2 | FLAG | 


SDLC/HDLC/X.25 
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Controller 


In addition, the SCC supports five encoding 
methods — NRZ, NRZI, FM1 (bi-phase mark), 
F'MO (bi-phase space), and Manchester (bi-phase 
level). 


Figure 20 


DATA 1 1 O O 1 O 


MANCHESTER a ae 2 a a a 
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Controller 


Registers 


PORT # 
A 


51 
50 
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B 


53 DATA 
52 


The SCC has the following capabilities: 


Asynchronous 

5, 6, 7, or 8 bits per character 

1, 1 1/2, or 2 stop bits 

Odd or even parity 

Times 1, 16, 32, or 64 clock modes 

Break generation and detection 

Parity, overrun and framing error detection 


Byte-oriented synchronous 

Internal or external character synchronization 

1 or 2 sync characters in separate registers 
Automatic sync character insertion and deletion 
Cyclic redundancy check (CRC) generation/ 
detection 

6- or 8-bit sync character 


SDLC/HDLC 

Abort sequence generation and checking 
Automatic zero insertion and deletion 
Automatic flag insertion between messages 
Address field recognition 

I-field residue handling 

CRC generation/detection 

SDLC loop mode with EOP recognition/loop 
entry and exit 


The baud rate is programmable for both 
channels. 


NAME READ/ DESCRIPTION 
WRITE 


R/W_ Transfer data 


SCC REGISTER POINTER R/W_ Transfer SCC register number 


and SCC register data 


Controller 
SCC Registers 
READ/ NO NAME DESCRIPTION 
WRITE 
R 0 Buffer and External Status See layout 
R 1 Special Receive Condition Status See layout 
R 2 Modified Interrupt Vector (Channel B) 
Unmodified Interrupt Vector (Channel A) 
R 3 Interrupt Pending Bits (Channel A) See layout 
R 8 Receive Buffer See layout 
R 10 Miscellaneous Status See layout 
R 12 Low Byte of Baud Rate Generator Constant 
R 13 High Byte of Baud Rate Generator Constant 
R 15 External/Status Interrupt Information See layout 
W 0 CRC Initialize See layout 
W 1 Transmit/Receive Interrupt and Data Transfer 
Mode Definition See layout 
W 2 Interrupt Vector 
Ww 3 Receive Parameters and Control See layout 
W 4 Transmit/Receive Miscellaneous Parameters 
and Modes See layout 
W 5 Transmit Parameters and Control See layout 
W 6 Sync Characters or SDLC Address Field See layout 
W 7 Sync Characters or SDLC Flag See layout 
W 8 Transmit Buffer See layout 
W 9 Master Interrupt Control and Reset See layout 
W 10 Miscellaneous Transmit/Receive 
Control Bits See layout 
W 11 Clock Mode Control See layout 
W 12 Low Byte of Baud Rate Generator Constant 
W 13 High Byte of Baud Rate Generator Constant 
W 14 Miscellaneous Control Bits See layout 
W 15 External/Status Interrupt Control See layout 


Serial Communications 


Serial Communications 
Controller 


Layout 


READ REGISTER 0 


READ REGISTER 1 


All Characters Sent 
(Asynchronous) 
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Controller 


READ REGISTER 3 
O 1 


READ REGISTER 10 
O 1 


Serial Communications 
Controller 


READ REGISTER 15 


WRITE REGISTER 0 
O 1 
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Controller 


WRITE REGISTER 1 


External/Status Interrupt Enable 


WRITE REGISTER 3 


Receive Enable 
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Controller 


WRITE REGISTER 4 


Enable Parity 


RITE REGISTER 5 


Transmit CRC Enable _ 
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Serial Communications 


Controller 


MONO,8 BITS MONO,16 BITS BISYNC,16 BITS BISYNC,12 BITS SDLC SDLC 


SYNCO 
SYNC1 
SYNC2 
SYNC3 
SYNC4 
SYNC5 
SYNC6 
SYNC7 


ADRO X 
ADR1 X 
ADR2 X 
ADR3 X 
ADR4 ADR4 
ADR5 ADR5 
ADR6 ADR6 
ADR7 ADR7 


MONO,8 BITS MONO,16 BITS BISYNC,16 BITS BISYNC,12 BITS SDLC 


WRITE REGISTER 6 
0  SYNCO SYNCO 
1 SYNC1 SYNC1 
2 SYNC2 SYNC2 
3. SYNC3 SYNC3 
4 SYNC4 SYNC4 
5  SYNC5 SYNC5 
6 SYNC6 SYNCO 
7 SYNC7 SYNC1 
WRITE REGISTER 7 
0  SYNCO X 

1 SYNC1 X 

2 SYNC2 SYNCO 
3. SYNC3 SYNC1 
4 SYNC4 SYNC2 
5  SYNC5 SYNC3 
6 SYNC6 SYNC4 
7 SYNC7 SYNC5 


SYNC8 
SYNC9 
SYNC10 
SYNC11 
SYNC12 
SYNC13 
SYNC14 
SYNC15 


SYNC4 
SYNC5 
SYNC6 
SYNC7 
SYNC8 
SYNC9 
SYNC10 
SYNC11 


0 


OR HH eH YE 
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Controller 


WRITE REGISTER 9 


Vector Includes 3 Bits of Status | 


WRITE REGISTER 10 
O 1 


6-Bit Sync 8-Bit Sync 
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Serial Communications 
Controller 


WRITE REGISTER 11 
O 1 


WRITE REGISTER 14 
O 1 
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Serial Communications 


Controller 


WRITE REGISTER 15 


Functions @ 


READ DATA 
This function reads character data. 
INPUT: DATA 


READ SCC REGISTERS 

This function reads Read Register 0-15. 

OUTPUT: SCC REGISTER POINTER = 
register # 

INPUT: SCC REGISTER POINTER = data 


WRITE DATA 
This function writes character data. 
OUTPUT: DATA ’ a 


WRITE SCC REGISTER 

OUTPUT: SCC REGISTER POINTER = 
register # 

OUTPUT: SCC REGISTER POINTER = data 
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Serial Communications 
Controller 


The SCC has direct addressing for the data reg- 
ister only. To access the other SCC registers, 
first write the register number to the SCC Regis- 
ter Pointer and then read or write the register 
using the SCC Register Pointer. 


The SCC can operate in three basic modes to 
transfer data, status and control information: 


polling 
interrupt 


block 


The block mode is not used on the AT&T Per- 
sonal Computer 6300. 


In the polling mode, Receive Character Availa- 
ble and Transmit Buffer Empty in Read Register 
0 are examined before receiving and sending a 
character. All interrupt functions must be dis- 
able. To do this, clear the Master Bit Enable and 
set the No Vector bit in Write Register 9. Then 
clear Write Register 1. This disables specific 
types of interrupts. 


For interrupt mode, the Master Interrupt Enable 
in Write Register 9 must be set. In addition, bits 
3-4 in Write Register 1 specify interrupts on 
receive character conditions. Bit 1 in Write Reg- 
ister 1 enables interrupts on Transmit Buffer 
Empty. Bit 0 enables External/Status interrupt. 
This interrupt is caused by transmit underrun 
condition, a zero count in the baud rate genera- 
tor, a break detection (Asynchronous Mode), 
Abort (SDLC Mode), or EOP (SDLC Loop Mode). 
Write Register 15 enables or disables more spe- 
cific types of interrupts. 
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Interrupt sources have the following priority: WV 


Receive Channel A 
Transmit Channel A 
External/Status Channel A 
Receive Channel B 
Transmit Channel B 
Receive Channel B 


A bit in Read Register 3 is set to indicate the 

highest priority device needing service. You can 

read the vector address of the interrupt service 

routine in Read Register 2 if it was programmed. 

If this vector is read on Channel B, it includes 

status bits. Vectors are initialized with Write 

Register 2. The interrupt service routine resets 

the Highest Interrupt Under Service in Write Ne 
Register 0. Other interrupts are reset in Write 

Register 0. 


To set the baud rate, first clear bits 0-1 in Write 
Register 14. Then load Write Register 12 and 13 
with the time constant. Last set bit 0-1 in Write 
Register 14 to enable the baud rate generator. To 
use the baud rate, set the transmit and receive 
clocks in Write Register 11 to the baud rate 
generator. 


To determine the time constant to use for a 
given baud rate, use this formula: 


3,686,400 -2 = Time Constant 
(16)(2)(Baud Rate) | 


The following table states the divisors to use to 
obtain a given baud rate. 
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Controller 


BAUD RATES USING 3.6864 MHZ CLOCK 
BAUD RATE TIME CONSTANT 


110 1045 
150 766 
300 382 
600 190 
1200 94 
2400 46 
4800 22 
9600 10 


In Asynchronous mode, you initialize: 


Write Register 1 to disable DMA transfers and to 
enable or disable interrupts, 


Write Register 3 to set Receive Enable and the 
number of bits per receive character, to disable 
synchronous functions, and to enable or disable 
Auto Enable, 


Write Register 4 to set parity, stop bits, and data 
rate, and to disable synchronous mode, 


Write Register 5 to set Transmit Enable and the 
number of bits per transmit character, to enable 
or disable Request to Send, Data Terminal 
Ready and Send Break, and disable synchro- 
nous functions, 


Write Register 9 to force a reset and set interrupt 
parameters, 


Write Register 10 to choose an encoding method, 
Write Register 11 to select clock sources, 


Write Register 12 and 13 to set the baud rate 
time constant, and 


Write Register 15 to enable the baud rate 
generator. 


Serial Communications 
Controller 


To transmit a character, wait for Transmit 
Buffer Empty to be set in Read Register 1 of the 
SCC. Then write the character to the Data 
Register. 


To receive a character, wait for Receive Charac- 
ter Ready in the Read Register 1 of the SCC. 
Then read the character from the Data Register. 


In synchronous mode, you must transfer the 
data using interrupts. The External/Status 
interrupt is used to monitor the status of Clear to 
Send and Transmit Underrun/EOM latch. 


In bisynchronous mode, you initialize: 


e Write Register 0 to reset Transmit Under- 
run/EOM Latch, receive CRC checker, external/ 
status interrupts, and enable interrupts on next 
receive character, 


e Write Register 3 to enable the receiver, and to 
program Sync Character Load Inhibit, Enter 
Hunt For Sync Character, and number of bits 
per receive character, 


e Write Register 4 to set parity, enable sync 
modes, number of bits per sync character, and 
clock mode, 


e Write Register 5 to enable Transmit CRC, to 
request 16-bit CRC polynomial, enable transmit, 
transmit 8 bits per character, and to set Data 
Terminal Ready and Request to Send, 


e Write Register 6 and 7 to set the sync bytes, 


e Write Register 9 first to reset the hardware and 
later to set interrupts and vector variables, 
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Write Register 10 to set length of sync character, 
the encoding method, to preset the CRC genera- 
tor and to set the loop mode and go active on 
poll if wanted, 


Write Register 11 to set the clock sources, and 


Write Register 15 to set interrupt enable 
conditions. 


The monosync transmitter is initialized as a 
bisynchronous transmitter with two exceptions: 


Only one sync character is written, and 


The 6-bit or 8-bit selection in Write Register 10 
must be made. 


In SDLC mode, you initialize: 


Write Register 0 to reset the transmit CRC gen- 
erator after transmit enable has been done and 
to enable interrupts, 


Write Register 1 to enable interrupts, 


Write Register 3 to select bits per receive charac- 
ter, to set address search mode, to enable CRC 
receiver and receive enable, 


Write Register 4 to set SDLC mode before any- 
thing else is initialized and later to set clock 
mode, 


Write Register 5 to select the SDLC-CRC poly- 

nomial, to set Request to Send, Data Terminal 

Ready, transmit character length, transmit en- 
able, and transmit CRC enable 


Write Register 6 to contain the secondary 
address field, 
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Sample 
Program 


9-146 


Write Register 7 to contain flag character 
01111110, 


Write Register 9 to reset the hardware and to set 
interrupt parameters, 


Write Register 10 to set loop mode, Go Active on 
Poll, Mark/Idle Flag, Abort on Underrun, the 
CRC preset condition, and the encoding mode, 


Write Register 11 to set clock sources, 


Write Register 14 to set the clock source for the 
DPLL, and 


Write Register 15 to set interrupt enable 
condition. 


; RECEIVE 


This routine receives one character 


PTER EQU 50 


DATA EQU 51 
RECEIVE: 
MOV DX,PTER __ ;Pointer Port Address 
XOR AL,AL “AL =0 
OUT DX,AL Select Read Register 0 
REC1: 
IN AL,DX ‘Get Read Register 0 
TEST AL,1 ;Receive character available 
JZ REC1 ;Jump if no character 
MOV DX,DATA _ ;Data Port Address 
IN AL,DX ;Read character 
RET 
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Speaker 


Functional The speaker uses a permanent magnet speaker 

Description which is driven by one of two sources. Counter 2 
of the Interval Timer can be programmed to 
automatically generate a pulse train. A bit in the 
Keyboard Control Register controls this pulse 
train. A bit in the Keyboard Control Register 
can also be programmed to manually generate a 
pulse train. 


Block 
Diagram 


SPKRDATA 
D1, PORT ADDRESS G1 


1.2288 MH 
= AUDIO 


TMR2GSPKR 


DO, PORT ADDRESS 61 | 
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Registers 
PORT # NAME READ/ DESCRIPTION 
WRITE 

61 KEYBOARD CONTROL Ww Contains speaker enable and 
manual pulse train bits. See 
Keyboard documentation. 

42 COUNTER 2 R/W Counter for audio speaker tone 
generation. See Timer 
documentation. 

43. TIMER CONTROL W Control register for Interval 
Timer. See Interval Timer 
documentation. 

Functions «© AUTOMATIC PULSE TRAIN 
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This function automatically generates an audi- 
ble sound. 
OUTPUT: 
INTERVAL TIMER CONTROL REGISTER 

BITS 1-3 = 3, square wave rate 

generator 

BITS 4-5 = 3, set counter 

BITS 6-7 = 2, generator 
INTERVAL TIME COUNTER 2 
KEYBOARD CONTROL 

BIT O=1, turns on speaker 


MANUAL PULSE TRAIN 
This function manually generates an audible 
sound. 
OUTPUT: KEYBOARD CONTROL 
BIT 1 This bit is set and cleared to 
generate a pulse train. 


Speaker 


Sequencing 
and Timing 


Sample 
Program 


Input to the timer is 1.2288MHz. To generate a 
1.00 KHz tone with the audio speaker, a square 
wave rate generator is used with a count of 614 
(1.2288MHz/2*614 = 1KHz). 


BEEP 
: This program sounds the beep manually 


KEY_CONTROL EQU 61 
TIMER_CONTROL EQU 43 
BEEP: 
MOV DX, TIMER_CONTROL ;port address 
MOV AL, B8H ‘of timer 
OUT DX, AL ‘set channel 2 
In mode 4 
MOV DX, KEY_CONTROL 
IN AL,DX 
MOV AH,AL 
OR AH, 01H ‘turn on Gate 
MOV BL, 80H 
BEEPI: 


MOV AL, AH ‘restore value 
AND AL, OFDH 
OUT DX, AL 
MOV Cx, 48H 
LOOP $ 

MOV AL, AH 
OR AL, 02H 
OUT DX, AL 
MOVE CX, 48H 
LOOP $ 

DEC BL 

JINZ BEEPI1 
MOV AL,AH 
OUT DX,AL 
RET 
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Functional The AT&T Personal Computer 6300 Display 

Description Controller interfaces the CPU to either mono- 
chrome or color displays. It uses a HD6845 CRT 
Controller. The Display Controller operates in 
two basic modes — text or all points addressable 
(APR) graphics. Several resolutions are avail- 
able depending on the mode and display. 


RESOLUTION PC GRAPHIC/ COLOR/ 
COMPATIBLE TEXT MONOCHROME 
80X25 YES ‘i C/M 
40X25 YES Z C/M 
640X400 NO G M 
640X200 YES G M 
320X200 YES G C 


In text mode, character attributes include 
reverse video, blinking, highlight, hide and 
underline. In color mode if blinking is not 
requested, one of 16 colors can be chosen. Other- 
wise, one of 8 colors can be chosen. 


In graphic mode, each pixel on a color monitor is 
one of four selected colors. These four colors are 
from a choice of 16. In a monochrome monitor, 
these 16 colors are shades of gray from black to 
white. 


The Display Controller has 32K of RAM to 
refresh one screen page. 
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The Display Controller can be upgraded with an 
optional board. This board gives you the follow- 
ing features: 


e Up to three additional screen pages in RAM 


e Software controlled look-up table for an interna- 
tional character set 


e High resolution characters (16 X 16 pixels 
instead of 8 X 16 pixels) 


e Hardware smooth scroll 


e The ability to mix text and graphic modes 
simultaneously 


e Upto 16 colors can be displayed at once 


Block 
Diagram 


Al-Al4 


CASU CASL 


A3- AB 


A15A19 
CPU CONTROL 


6B45ADC 
CRI CPU] 
CAS 


DRAM DAI( 15 


LATH SYNC 
LATV SYNC 


00-D16 <> 


MODEO 


MODE! 


DEGAUSS 
BLANKING 


STATUS BITS 


TIMING CONTROL 
SIGNALS 
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Registers 
PORT # NAME READ/ DESCRIPTION 
WRITE 

3D8 MODE SELECT REGISTER 1 W See layout 

3D9 COLOR SELECT REGISTER W See layout 

3DA STATUS REGISTER R See layout 

3DE MODE SELECT REGISTER 2 W See layout 

3D4 POINTER TO HD6845 REGISTER W 

3D5 HD6845 DATA REGISTER R/W 

HD6845 Registers 
NO NAME READ/ INITIALIZATION VALUE 
WRITE 40X25 80X25 GRAPHIC 

0 HORIZONTAL TOTAL WwW 38 71 38 
1 HORIZONTAL DISPLAYED W 28 50 28 
2 HORIZONTAL SYNC POSITION W 2D 5A 2D 
3 HORIZONTAL SYNC WIDTH W 06 OC 06 
4 VERTICAL TOTAL W 1F 1F 7F 
5 VERTICAL TOTAL ADJUST W 06 06 06 
6 VERTICAL DISPLAYED WwW 19 19 64 
7 VERTICAL SYNC POSITION W IC 1C 70 
8 INTERLACE MODE W 02 02 02 
9 MAX.SCAN LINE ADDRESS W 07 07 01 
A CURSOR START LINE (SIZE) W 06 06 06 
B CURSOR END LINE WwW 07 07 07 
C ACTIVE PAGE START ADDR (fA) W 00 00 00 
D ACTIVE PAGE START ADDR (L) W 00 00 00 
E CURSOR ADDRESS (H) R/W 
F CURSOR ADDRESS (L) R/W 
10 LIGHT PEN (H) R 
11 LIGHT PEN (L) R 
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Layout 


MODE SELECT REGISTER 1 | 
O 1 


MODE SELECT REGISTER 2 
O 


Video Controller 


COLOR SELECT REGISTER 1 (Graphics Mode Only) 


STATUS REGISTER 
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Text Mode Every character position is defined by two bytes: 


isfisfiafi2|iifiols [s [7]e[5]4] 3] 2]1]o. 
1 |r |e |p |r |r |e]p]ascu cHar cope 


Background Foreground 
Attribute Byte 


If neither the underline or blinking capabilities 
are specified, the color choice for foreground and 
background with a color monitor is: 


Black Red 

Blue Magenta 
Green Brown 

Cyan Light Gray 
Dark Gray Light Red 
Light Blue Light Magenta 


Light Green Yellow 
Light Cyan White 


With a monochrome monitor, the color choice is: 


Black 
Darkest Gray 


Lightest Gray 
White 


The codes for common monochrome choices 
follow: 


normal 00001111 
reverse video 11110000 
non-display black 00000000 
non-display white 11111111 


Video Controller 


De ce a 


When the blinking capability is specified in 
Mode Select 1, then Bit 15 of the attribute byte 
specifies whether the character blinks. 


If the underline capability is specified in the 
Mode Select Register 2, then Bit 11 specifies 
whether the character is underlined. 


The first position in the left-hand corner of the 
screen is defined in the first two bytes of 
memory starting at B0000. The next position, 
one column to the right, is defined in the next 
two bytes of memory at BO002. The first charac- 
ter in the next row follows immediately after the 
definition for the last character in the first row. 
For 80 column X 25 rows, memory looks like 
this: 


BO0000 
BOOAO 
B0140 


BOE60 
BOF 00 


The 80 column display uses 4K of RAM and the 
40 column display uses 2K of RAM. The rest of 
the 32K is used for multiple screen images called 
pages. There are either 16 or eight pages 
available. 
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Graphics 
Mode 


In graphics mode, the display screen is a grid of 
pixels, the smallest displayable unit on a video 
monitor. In medium resolution, there are 640 
across and either 200 or 400 down. 


In high resolution, each pixel is defined by one 
bit. Bit 7 of each byte defines the first pixel and 
bit 0 defines the last pixel to be displayed. The 
background color is always black and is dis- 
played when the pixel is off. When the pixel is 
on, the foreground color is one of 16 shades of 
gray as defined in the Color Select Register Bits 
0-2 and 3. | 


In medium resolution, each pixel is defined by 
two bits: 


76 | 54 | 32 | 10 
ist | 2nd | 3rd | 4th | PIXELS 


The value of two bits define one of four prese- 
lected colors. 


0 — background color 


1 — color 1 
2 — color 2 
3 — color 3 


The background color is defined by Bits 0-3 in 
the Color Select Register. Colors 1, 2, and 3 are 
cyan, magenta and white if Bit 5 of the Color 
Select Register is zero and are green, red, and 
yellow if Bit 5 is one. 


Unlike the text mode, rows of pixels do not fol- 
low one after another in memory. The following 


memory maps illustrate the layouts. 
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SLES A EE I NS SIE ETI UTS EP OE OS TA, Se SR IRE: 


MEMORY MAP (640 X 400 GRAPHICS MODE) 


B8000 
LINES 0,4,8,....396 
8000 BYTES 
B9F3F 
NOT USED 
BAO00 LINES 1,5,9,....397 
8000 BYTES 
BBF8F 
NOT USED 
BC000 LINES 2,6,10,....398 
8000 BYTES 
BDF3F 
NOT USED 
BE000 LINES 3,7,11,....399 


BFF3F 
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MEMORY MAP (320 X 200 GRAPHICS MODE) 


B8000 
EVEN LINES 0,2,4,.....198 
8000 BYTES 
PAGE 0 
BOF3F | 
NOT USED 
BA000 ODD LINES 1,3,5......199 
8000 BYTES 
PAGE 0 
BBF3F 
NOT USED | 
BC000 EVEN LINES 
8000 BYTES 
PAGE 1 
BDF3F 
NOT USED 
BE000 ODD LINES 
8000 BYTES 
BFF3F 
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Functions ® 
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INITIALIZE HD6845 
This function initializes the 16 registers of the 
HD6845 with predetermined values. 
OUTPUT: POINTER TO HD6845 REGISTER 
Number of HD6845 register 
HD6845 DATA REGISTER 
Value of HD6845 register 
(Repeat 16 times for each register) 


SET MODE 
Set different mode characteristics such as text or 
graphics, type of graphics, blinking character, 
etc. 
OUTPUT: MODE SELECT 1 

MODE SELECT 2 


SET COLOR TYPE 

Choose the different color or shades of gray to 
display. 

OUTPUT: COLOR SELECT REGISTER 


SET CURSOR SIZE 
Set starting and ending line for cursor. 
OUTPUT: POINTER TO HD6845 REGISTER 
OAH 
HD6845 DATA REGISTER 
start line 
POINTER TO HD6845 REGISTER 
OBH 
HD6845 DATA REGISTER 
end line 
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e SET CURSOR POSITION 
Set cursor to location in memory. 
OUTPUT: POINTER TO HD6845 REGISTER 
OKH 
HD6845 DATA REGISTER 
most significant byte of address 
POINTER TO H36845 REGISTER 
OFH 
HD6845 DATA REGISTER 
least significant byte of address 


e READ CURSOR POSITION 
Read the current position of the cursor. 
INPUT: POINTER TO HD6845 REGISTER 
OEKH 
HD6845 DATA REGISTER 
most significant byte of address 
POINTER TO H36845 REGISTER 
— OFH 
HD6845 DATA REGISTER 
least significant byte of address 


e SET ACTIVE PAGE 
Set the address of the current page to display. 
OUTPUT: POINTER TO HD6845 REGISTER 
OCH 
HD6845 DATA REGISTER 
most significant byte of address 
POINTER TO H36845 REGISTER 
ODH 
HD6845 DATA REGISTER 
least significant byte of address 


Sequencing There are two methods of communicating with 

and Timing _ the video display. One is with I/O commands. 
This method is used to set the modes of opera- 
tion, the cursor position, the cursor size or the 
current active page. 
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Scrambler ROM 


For programs which do not use the regular Nas 
BIOS calls, the 6845 CRT controller requires 
some additional circuitry to translate the data 
sent to it by application programs into the 
appropriate data for the display controller. 
This circuitry (called the scrambler circuitry) 
converts the IBM6845 register values to the 
values which the display controller requires. 
A listing of these conversions follows. For 
additional information see the AT&T Per- 
sonal Computer 6300 reference manual. 


SCRAM/ (USED ON REV. P1-P2A) 
Unrecognized command 


#D0IS ..358 


Q0@@ 39 39 39 39 39 39 39 35 «439: 39: 39 39: 39 39 39 39) =O 9999999999999999 

G81@ 33 339 39 35 39 39 39 39 «639 39 39 39 39 39 39 3S)~ = =«69999999999999999 

QG@20 39 39 39 39 39 39 39 39 «639: 39 39 39 39 39 39 359) =69999999999999999 Neal 
O0s@ 39 39 39 39 32 39 39 35 39 39 3S 39 39 39 39 3S s9eg999sS9959s993 

BO4g 33 39 39 39 33 39 39 39 39 39 39 39 39 39 39 359 4 69§999999999999993 

BO5@ 39 39 39 39 33 35 73 73 73 73 #3 73 73 73 73 73 

Q@@60 73 73 73 73:73:73: 73~«73)~«=«73~73 «73 73 73 73 73 73 

Oe. £3 03 73 #3 74a #3 #3 75 #39 73 73 #3 73 FS 2723 23 

HHH O80 O81 OS 083 04 5 BB @F ®S ©9 OA OB OC @D BE GF 


Q@9@ 18 11 12 
@BAM 2H 2! 
QB@Ba 
QB@CH 4@ 41 42 « 
O80 S@ Sl S52 


— 
Lil 
kK 
+t 

iN 
tn 
bk 
Mm 

J 
kK 
mm 
= 
ie 
Ie & 
DD 
kK 
mm 
Ee 
ea | 
bk 
2 
bh 
PF 
= 
7 


} 29 2A 2B 20 2D 2E 2F IHERB” 


[ 27 
136 SC 3D SE SF @123456789:3<=>? 
L 


fh 
bh 
oa) 
J wo 
J 
Lu 
hh 
Ln 
ho 

™m m% 0 
oof 
J 
J 
co 


Lil 
Lil 
bo 
Lil 
ha 
WNE @& 
Gl Gi tat 
Cl 
4s 
uy 
Ln 
Lod 
m 
J 
tia ff 
oo 
Ww 
SW 
» TD 


i 40 40 46 4F @ABCDEFGHIJILMNO 
5A 5B 5C 5D SE SF PORSTUVWXYZ[\JAL 


in 
gs 
ae % 
in 


1 to to f 
tn 
tu 
Ln 
n 
tn 


ts 
Lil 
tt 
tI 
Bi 
Ln 
pi 
™m 
+s 
| 
Yok Wh 
a | i 
th & &) f 
io 
ts 
BB 
Bn 
ima) 
4s 
CI 


w 


mom oa 
{ 
co co 


OBE 68 61 62 635 64 65 66 67 68 69 6A 6B 6C 6D 6E EF *abcdefghi jklmna 
Q@F@ 7@ 71 72 73 74 75 76 77 78 79 7A 7B 70 7D PE PF opgrstuwwxyz{l}~. 
0100 68 01 2 O83 O4 OS BE OY 68 O9 BA BB OC OD BE OF ................ 
OLi0 10 32 t2 19 14 1s te 2? JB TS PR IB IC AP AE IF hawteewwceawnen ed 
9120 20 21 22 23 24 25 26 27? 28 29 2A 2B 20 2D 2E 2F I HSAE? ( )¥4+,-.7 
0130 30 31 32 33 34 35 36 3Y 38 39 SA 3B 3C 3D SE SF 01239456769: :<=>7 
®14@ 40 41 42 43 44 45 46 47 46 49 4A 4B 40 40 4E 4F = @ABCDEFGHIJKLMNO 
Wise 30 Sl S253 54 55 Sb 57 56 59 SA 5B SC SD SE SF PORSTUVNXYZ[\}AW 
@16@ 6@ 61 62 63 64 65 66 67 68 69 6A 6B 6C 60 6E EF *abcdefghi jklmnoa 
@17@ 70 71 72 73:74 75 76 77) «78 79 7A 7B PC 7D PE PF pgrstuvuxyz{l}~. 
0156 68 @1 2 03 64 OS BE BF BE O39 BA BB OC OD OE OF ........ eee eee N y 
O30 16 11 2 23:14 15 16 17 Ja 29 IA JE 26 2 7 IF lkdwewkateedvicodas 
Q1AQ® 20 21 22 23 24 25 26 27) 428 29 2A 2B 20 2D 2E 2 1 HS46" ()*+,-.7 
YIBO 30 Sl 32 33 34 35 36 37 38 39 3A 36 3C 3D SE S 0123456789: ;<=>? 
OB1C08 48 41 42 43 44 45 46 47 486 49 4A 4B 40 4D 4E 4F @ABCDEFGHIJKLMNO 
ZiDW SY S51 S52 53 54 55 56 SY 58 59 SA 5B SC SD SE SF PORSTUVWIXYZ[\ JAW 
®1E® 66 61 62 63 64 65 66 67 68 69 6A 6B 6C 6D 6E EF *abcdefqhijklmno 
@1F@ 7@ 7 72 73 74 75 76 7? 78 79 7A 7B PC 7D FE PF op.rstuvuxyz{l}~. 
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H208 
a21a 
O220 
A238 
B240 
Q258 
O268 
B27 
258 
a298 
B2AQ 
O2B@ 
Q2Ce@ 
@2D8 
Q2E8 
O2F a 
O308 
O31 
O320 


O398 
Q3A8 
@3Be 
@a3Ce@ 
O308 
BSE@ 
O3F a 
a4aa 
@410 
H420 
Q43508 
B44 
Q45e 
O460 
a47o 
Q488 
8498 
A4AH 
@4B68 
a4Ce 
H408 
@4E0 
O4F a 
asa 
@518 
O52 
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QO540 08 BB BE BB 
Qa5S5SQ@ BG BE BH BO 
QBSE® BG BH BH BB 
Q@57O0 8H BH BH BE 
0588 BG BB BE BB 
Qa5980 G88 BH BE BB 
QaSAB OB BO OH BA 
OSBG BG BA BH BB 
asSca @@ BA AB BA 
aSD® Oa BB BE BB 
@ASE® OO BH BH Be 
OSFe 88 BH BH BO 
QO600 O88 B1 B2 BS 
@61@ 16 11 12 13 
Q620 20 21 22 23 
0630 30 31 32 33 
®64@ 40 41 42 43 
Q@650 S58 S51 S2 53 
®660 680 61 62 63 
Q@670 PO Fl F2 73 
@680@ 88 Bl 82 83 
®69@ 30 91 92 93 
®6A® AGB AL AS AB 
®66B8 Be Bl Be B3 
®6C@ Ce Cl C2 C3 
®6EDe De Dl D2 D3 
®6E® E® El E2 ES 
@6F@ FO Fl Fe F3 
Q@70@@ 1919 19 19 
O18 129 19 13 135 
O720 19 19 19.19 
@73a0 159 197 19 23 
@?4@ 19 64 64 64 
@a7S@ 64 4 64 
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@7D® 64 64 64 64 
OPE® 64 64 64 64 
Q@7FQ@ 64 64 64 64 
Q60H® BO OBB BB A3 
0810 88 BB BB BB 
HB20 08 BH BH BB 
Q8B30 88 BA BO BB 
0840 88 BB BB BO 
Q85Q@ OG BB BA BOB 
QO8608 88 BB BO BB 
QB7G BH BA BE AB 
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ABBE HO OO OO OH BB BO BA BO OO OO OB OB BB ................ 
OBIH OO BO BO BB BO BO BO BH OG BO BO BO BB OB OB BB ................ 
OBAB OH OO OO BH BA BO BO GO BH OO BB OO OB BB BB OO .............44. 
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Index 


A 


A (assemble) DEBUG 
command 3-9 to 3-12 
Absolute disk read (INT 25H) 
7-19 to 7-21 
Absolute disk write (INT 26H) 
7-22 to 7-24 
Addressing 4-1 to 4-14 
Aligned words 4-5 
Allocate memory (Function 
48H) 7-140 to 7-141 
ASCII 3-15, 8-22 to 8-27 
ASCIIZ strings 5-11 to 5-12 
Assembler 1-4 
modules 2-7 to 2-8, 2-12 
in DEBUG 38-9 to 3-12 
DEBUG list 3-39 to 3-40 
using system calls 7-6 
Attribute (see File attribute 
and Video control) 
ARF (see Automatic response 
file) 
Asynchronous communica- 
tions (see communications) 
Automatic response file 2-9, 
2-19 to 2-20 
Auxiliary input (Function 03H) 
7-31 
Auxiliary output (Function 
04H) 7-32 


B 


BASIC 1-4, 7-6 
BIOS 
Memory usage 5-4, 5-5 
Service routines 8-1 to 8-44 
Block devices 9-8 


Bootstrap loader (INT 19H) 8-4, 
8-30 

Break ON/OFF Command 8-33 
Breakpoints 3-21 to 3-23 
Buffered keyboard input 
(Function 0AH) 7-40 to 7-41 
Buffers Command 8-34 

Bus lines 9-6 to 9-7 


C 


C (compare) DEBUG command 
3-13 to 3-14 
Calendar (see Clock) 
Calculated addressing 4-14 
Change file attributes (Function 
43H) 7-130 to 7-131 
Change current directory 
(Function 3BH) 7-117 
Character devices 9-8 
Control-C check (Function 
33H) 7-106 to 7-107 
Check keyboard status 
(Function 0BH) 7-42 
Class 2-7 
CLOCK 
device 9-26, 9-123 to 9-127 
(also see Time and Date) 
Close file 
(Function 10H) 7-50 to 7-51 
(Function 3EH) 7-122 
Clusters 5-138 to 5-28, 7-109 
COM files 3-5, 3-26, 3-30, 6-1 to 
6-7, 6-10, 6-21 
Command line 
MS-LINK 2-9, 2-18 to 2-19 
DEBUG 3-3, 3-7 to 3-8 
direct commands 6-18 
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COMMUNICATIONS Date 
BIOS routines (INT 14H) 8-4, read 7-93 to 7-94, 7-157 to 
8-19 to 8-21 7-158 


device drivers 9-27 to 9-35, 
9-128 to 9-146 
Compilers 1-4 
COMSPEC 6-18 
CON device (see Console) 
CONFIG.SYS 
Break ON/OFF 8-33 
Buffer 8-34 
Device 8-34 
Files 8-35 
Shell 8-35 
Console 2-12 
Direct I/O 7-35 to 7-36 
Direct input 7-37 
(also see Keyboard and 
Video) 
Control blocks (see File 
control block) 
Control-C check (Function 
33H) 7-106 to 7-107 
Country-dependent informa- 
tion 7-110 to 7-114 
Create file 
(Function 16H) 7-64 to 7-65 
(Function 3CH) 7-118 to 7-119 
Create sub-directory (Function 
39H) 7-115 
Current disk (Function 19H) 
7-68 


D 


D (display) DEBUG command 
3-15 to 3-16 


1-2 


set 7-95 to 7-96, 7-157 to 

7-158 
DEBUG 3-1 to 3-44 

Commands: 

A (assemble) 3-9 to 3-12 

C (compare) 3-13 to 3-14 

D (display) 3-15 to 3-16 

E (enter) 3-17 to 3-19 

F (fill) 3-20 

G (go) 3-21 to 3-23 

H (hexarithmetic) 3-24 

I Gnput) 3-25 

L (load) 3-26 

M (move) 3-28 

N (name) 3-5, 3-29 to 3-31 

O (output) 3-32 

Q (quit) 3-33 

R (register) 3-34 to 3-36 

S (search) 3-37 

T (trace) 3-38 

U (unassemble) 3-39 to 3-40 

W (write) 3-41 to 3-43 
Delete directory entry (Function 
41H) 7-127 
Delete file (Function 13H) 
7-56 to 7-58 
Determine memory size (INT 
12H) 8-4, 8-31 
DEVICES 

character 9-8 

drivers 1-4, 9-4 to 9-161 

installation 9-12 

read 7-123 to 7-124 
Device header 9-9 to 9-12 
Direct addressing 4-13 


Direct console I/O (Function 
06H) 7-35 to 7-36 
Direct console input (Function 
07H) 7-37 
Directory 5-14 to 5-17, 5-23 
Change 7-117 
Create sub-directory 7-115 
Delete entry 7-127 
Delete file 7-56 to 7-58 
Move entry 7-115 to 7-156 
Remove directory 7-116 
Return current 7-139 
Step through 7-153 
Diskette 
allocation 5-13 to 5-23 
BIOS routines (INT 13H) 8-4, 
8-17 to 8-18 
Disk operations: 
(also see Files) 
Create sub-directory 7-115 
Current disk 7-68 
Select 7-46 
Current directory 7-139 
Delete directory entry 7-127 
Duplicate file handle 7-137 
Move directory entry 7-155 to 
7-156 
Read absolute 7-19 to 7-21 
Remove directory 7-116 
Reset 7-45 
Space 7-109 
Step through directory 7-153 
Transfer address 7-69 to 7-70, 
7-103 
Verify flag 7-101 to 7-102, 
7-154 
Write absolute 7-22 to 7-24 
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Display character (Function 
02H) 7-30 

Display string (Function 09H) 
7-39 

DMA controller 9-36 to 9-44 
DOS version number 7-104 
DSALLOCATE link switch 
2-14 

Duplicate file handle (Function 
45H) 7-137 


E 


E (enter) DEBUG command 
3-17 to 3-19 
Equipment check (INT 11H) 
8-4, 8-31 
Error messages 
MS-LINK 2-24 to 2-27 
DEBUG 38-22, 3-44 
EXE2BIN 6-8 to 6-9 
EXE files (see Run files) 
EXE2BIN 6-2, 6-5 to 6-9 
EXEC (see Load and execute 
program) 
Exit address (INT 23H) 7-15 


F 


F (fill) DEBUG command 3-20 
FAT (see File Allocation Table) 
Fatal error abort address (INT 
24H) 7-16 to 7-18 
FCB (see File control block) 
FILES 
(also see Disk operations) 
allocation table 5-13, 5-18 to 
5-21, 5-22, 5-23 
attribute 5-15, 7-53 
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change 7-130 to 7-131 
close file 7-50 to 7-51, 7-122 
control block 3-380, 5-6 to 5-12, 
6-16 to 6-19 
create file 7-64 to 7-65, 7-118 
to 7-119 
delete file 7-56 to 7-58 
disk transfer address 7-69 to 
7-70, 7-103 
duplicate file handle 7-137 
forced 7-138 
find 7-151 to 7-152, 7-52 to 
7-538, 7-54 to 7-55 
header (Run files) 6-10 to 6-14 
load and execute program 
file 7-145 to 7-148 
names 7-89 to 7-92, 7-66 to 
7-67 
open file 7-47 to 7-49, 7-120 to 
(Oral 
pointer 7-128 to 7-129 
random operations 
block read 7-83 to 7-85 
block write 7-86 to 7-88 
record read 7-71 to 7-72 
record write 7-73 to 7-75 
set relative record 7-79 to 
7-81 
read 7-123 to 7-124 
sequential operations 
read 7-59 to 7-61 
write 7-62 to 7-63 
size 7-76 to 7-78 
usage 2-3 to 2-6 
write 7-125 to 7-126 
Files Command 8-35 


1-4 


Find file (Function 4EH) 
7-151 to 7-152 

Flags 4-8 to 4-9 

Floppy diskette interface 
controller 9-45 to 9-65 

Flush buffer, read keyboard 
(Function OCH) 7-43 to 7-44 
Force duplicate of handle 
(Function 46H) 7-138 

Free allocated memory 
(Function 49H) 7-142 
Function request (INT 21H) 
7-13, 7-29 to 7-173 

Functions (DOS) 7-2 to 7-3, 7-8 
to 7-9, 7-13, 7-29 to 7-178, 7-160 
to 7-173 

FORTRAN 2-14, 7-6 


G 


G (go) DEBUG command 3-21 
to 3-23 
Get date 
(Function 2AH) 7-93 to 7-94 
(Function 57H) 7-157 to 7-158 
Get disk free space 
(Function 36H) 7-109 
Get disk transfer address 
(Function 2FH) 7-103 
Get DOS version number 
(Function 30H) 7-104 
Get interrupt vector 
(Function 35H) 7-108 
Get time 
(Function 2CH) 7-97 to 7-98 
(Function 57H) 7-157 to 7-158 


cf” 
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Global symbols (see Public 
symbols) 
Group 2-8, 2-14 


H 


H (hexarithmetic) DEBUG 
command 3-24 

Handles 5-12 

Hard disk controller 9-66 to 
9-93 

HEX files 3-4, 3-27 

HIGH Link switch 2-14 


I 


I Gnput) DEBUG command 
3-25 
I/O control for devices 
(Function 44H) 7-132 to 7-136 
I/O ports 9-3 
Immediate addressing 4-12 
Indirect addressing 4-13 
INPUT 
(also see files) 
auxiliary device 7-31 
control devices 7-132 to 7-136 
file or device 7-123 to 7-124 
keyboard 
buffered 7-40 to 7-41 
direct 7-38 
echo 7-29 
flush buffer 7-43 to 7-44 
Installing a device driver 9-12 
Interrupts 
In general 5-3, 5-4, 7-4, 7-7, 
7-10 to 7-28, 7-159, 8-1 to 8-32, 
9-4 to 9-5 


Get vector 7-108 
Set vector 7-82 
Interrupt controller 9-105 
to 9-115 
Interval timer 9-116 to 9-122 


K 


Keep process (Function 31H) 
7-105 
KEYBOARD 
(also see Console) 
BIOS routines 8-4, 8-22 to 
8-28 
Buffered input 7-40 to 7-41 
Control-C check 7-106 to 
7-107 
Device driver 9-94 to 9-99 
Flush buffer read 7-43 to 7-44 
Status check 7-42 


L 


L (load) DEBUG command 3-5 
LIB files (see Libraries) 
Libraries 2-4, 2-10, 2-12, 2-17, 
2-18, 2-19, 2-22 
LINENUMBERS link switch 
2-15, 2-21 

Linking object modules (see 
MS-LINK) 

List files (see MAP files) 

Load module (see Run files) 
Loading programs 6-18 to 6-22, 
7-145 to 7-148 

Load and execute program 
(Function 4BH) 7-145 to 7-148 
Logic lines (see Bus lines) 
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M 


M (move) DEBUG command 
3-28 
Macro assembler (see 
Assembler) 
MAP files 2-4, 2-10, 2-11, 2-15, 
2-16, 2-18, 2-19, 2-23 
MAP link switch 2-15, 2-21, 
2-23 
Media check 2-19, 9-19 
Memory 
addressing 4-1 to 4-14 
allocation 7-142 to 7-144 
maps 5-1 to 5-5 
size 8-4, 8-31 
Messages (also see Error 
messages) 1-3, 3-5, 3-6, 3-35 
Modifications to BIOS 8-32 to 
8-44 
Modify allocated memory 
blocks (Function 4AH) 7-148 to 
7-144 
Move directory entry (Function 
56H) 7-155 to 7-156 
Move file pointer (Function 
42H) 7-128 to 7-129 
MS-LINK 1-4, 2-1 to 2-27 


N 


N (name) DEBUG command 
3-5, 3-29 to 3-31 

NO link switch 2-17 
Non-aligned words 4-5 
Notation 1-3 


1-6 


O 


O (output) DEBUG command 
3-32 
OBJ files (see Object modules) 
Object modules 2-2, 2-4, 2-10, 
2-11, 2-18, 2-19, 2-20 
Open file 
(Function O0FH) 7-47 to 7-49 
(Function 3DH) 7-120 to 7-121 
OUTPUT 
Auxiliary device 7-32 
Character 7-30, 7-33 to 7-34 
Control devices 7-132 to 7-136 
File or device 7-125 to 7-126 
Printer BIOS routines 8-4, 
8-29 
Screen dump 8-4, 8-30 
String 7-39 


P 


Parallel printer interface 

9-100 to 9-104 

Parse file name (Function 29H) 
7-89 to 7-92 

Pascal 2-14, 2-17, 7-6 

PATH command 6-18 
Pathname string (see ASCIIZ 
strings) 

PAUSE link switch 2-15 to 
2-16, 2-20 

Print character (Function 05H) 
7-33 to 7-34 

Print screen (INT 05H) 

8-4, 8-30 

Printer routines (INT 17H) 

8-4, 8-29 
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Printer 2-12, 2-21, 8-4 
(also see Output) 
PRN device (see Printer) 
Process control (also see 
Memory allocation) 

Keep process 7-105 

Load and execute program 

7-145 to 7-148 

Return code 7-150 

Terminate 7-11 to 7-12, 

7-25 to 7-28, 7-149 
Program files (also see Run 
files and COM files) 

Load and execute 7-145 to 

7-148 

Structure 6-1 to 6-22 
Program segment prefix 3-5, 
6-15 to 6-17, 6-19, 6-21, 7-11 
Program terminate (INT 20H) 
7-11 to 7-12 
PROMPT command 6-18 
Prompts 1-8, 2-10, 2-12, 3-4, 3-12 
Public symbols 2-15, 2-20, 2-23 


Q (quit) DEBUG command 
3-33 


R 


R (register) DEBUG command 
3-34 to 3-36 

Random block read (Function 
27H) 7-83 to 7-85 

Random block write (Function 
28H) 7-86 to 7-88 

Random Read (Function 21H) 
7-71 to 7-72 


Random Write (Function 22H) 
7-73 to 7-75 

Read from file or device 
(Function 3FH) 7-123 to 7-124 
Read keyboard (Function 08H) 
7-38 

Read keyboard and echo 
(Function 01H) 7-29 

Registers 4-6 to 4-10, 7-9 
Register addressing 4-12 
Remove directory (Function 
3AH) 7-116 

Rename file (Function 17H) 
7-66 to 7-67 

Request header 9-13 to 9-15, 
9-18 to 9-28 

Reset disks (Function 0DH) 
7-45 

Reset verify flag (Function 
2EH) 7-101 to 7-102 

Retrieve return code of child 
(Function 4DH) 7-150 

Return country-dependent info. 
(Function 38H) 7-110 to 7-114 
Return current verify flag 
(Function 54H) 7-154 

Return current directory 
(Function 47H) 7-139 

Run files 2-4, 2-11, 2-14, 2-15, 
2-18, 2-19, 2-21, 3-4, 3-5, 3-27, 6-1 
to 6-3, 6-5 to 6-7, 6-13 to 6-14, 
6-20 


S 


S (search) DEBUG command 
3-37 
Scrambler ROM 9-162 


1-7 


System 
Programer’s 
Guide 


Search for first entry (Function 
11H) 7-52 to 7-53 
Search for next entry (Function 
12H) 7-54 to 7-55 
Sector 5-21, 5-22, 5-23, 7-109, 
8-17 
Segment 2-7, 2-14, 2-21, 3-7, 3-8, 
3-10, 3-21, 3-28, 3-37, 4-3 to 4-4, 
4-7, 4-11, 6-6, 6-7, 6-16, 6-18, 6-21 
Select disk (Function 0EH) 7-46 
Sequential read (Function 
14H) 7-59 to 7-61 
Sequential write (Function 
15H) 7-62 to 7-63 
SET command 6-18 
Set date 
(Function 2BH) 7-95 to 7-96 
(Function 57H) 7-157 to 7-158 
Set time 
(Function 2DH) 7-99 to 7-100 
(Function 57H) 7-157 to 7-158 
Set disk transfer address 
(Function 1AH) 7-69 to 7-70 
Set relative record (Function 
24H) 7-79 to 7-81 
Set interrupt vector (Function 
25H) 7-82 
Set verify flag (Function 2EH) 
7-101 to 7-102 
Shell command 8-35 
Speaker 9-147 to 9-149 
STACK link switch 2-16 
Status byte 5-5 
Step through directory files 
(Function 4FH) 7-153 
Switches 2-13 to 2-17, 2-19 
Syntax (general) 1-3 
System calls 7-1 to 7-173 


1-8 


T 


T (trace) DEBUG command 3-38 
Terminate address (INT 22H) 
7-14 
Terminate but stay resident 
(INT 27H) 7-25 to 7-26 
Terminate process (Function 
4CH) 7-149 
Terminate program (Function 
OOH) 7-27 to 7-28 
Time 
get 7-97 to 7-98, 7-157 to 7-158 
set 7-99 to 7-100, 7-157 to 
7-158 
Token (see Handle) 


U 


U (unassemble) DEBUG 
command 3-39 to 3-40 
Utility programs 1-4 


Video control (also see Console 
and Output) 
BIOS routine (INT 10H) 8-4, 
8-5 to 8-16 
Video controller 9-150 to 9-161 
VM.TMFP file 2-5, 2-6, 2-16 


W (write) DEBUG command 
3-41 to 3-43 


Write to file or device (Function 
41H) 7-125 to 7-126 


